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ABSTRACT 


Computer programs employing two rigorous methods for 
the solution of absorbers and reboiled absorbers have been de- 
veloped. The methods, one a "bubble point" method and the 
other a "sum rates" method, are compared for relative merit. 
Two sources of equilibrium and enthalpy data have been tried 
with each method. These are the Chao-Seader correlation and 
the combination of NGAA polynomial K data and the Yen and 
Alexander enthalpy data correlation. 

The sum rates method was found to calculate an absorber 
solution up to six times more quickly than a bubble point me- 
thod using the same data. The sum rates method did not reach 
a solution for the reboiled absorber problems attempted. Con- 
vergent solutions for the absorber and reboiled absorber were 
obtained using the bubble point procedure. 

Significant differences in results were obtained with 
different sources of data. The NGAA and Yen and Alexander 
data required a special method of determining stream enthal- 
pies and gave results at some variance to those from the other 
data. Chao-Seader data provided results which checked reason- 
ably with the one set of operating data available. The pro- 
grams were up to twelve times slower in reaching a solution 
when using Chao-Seader data than when using NGAA and Yen and 


Alexander data in some of the problems attempted. 
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£. OLINTRODUCTION 


Absorbers and reboiled absorbers are of great impor- 
tance to the natural gas industry for the recovery of propane, 
butanes and heavier components from the raw gas. Absorbers, 
by the countercurrent contact of a lean oil with the raw or 
"wet' gas, cause the heavier components in the gas to be ab- 
sorbed into the oil. However, if special precautions are not 
taken, an undesirable amount of the lighter components, such 
as methane and ethane, may be absorbed and the percentage ab- 
sorption of the propane and heavier components may not be as 
high as desired. 

Gilmore and Bauer(l) state that there are four changes 
that can be made to an existing absorber to improve the per- 
centage recovery of propane. These are: 

1. increase the pressure, 

Cpe ncressce: the: molaliratio-of absorption: oil to gas, 

3. lower the temperature of absorption, or 

4, increase the number of theoretical trays. 

All of these may be either uneconomical or impossible because 
of the existing conditions. 

An economical change may be the addition of a strip- 
ping section with a reboiler below the feed plate, thus pro- 
ducing a fractionating absorber. If this is not practicable, 
the rich oil from the absorber may be fed to a reboiled ab- 
sorber where the split between the undesirable ethane and 


methane and the desired heavier components can be accomplished. 
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Various modes of employing the reboiled absorber to 
increase propane recovery while restricting the amount of 
ethane and methane absorbed have been put forward(1,2,3,4,5). 
The advantages of using a reboiled absorber as opposed to in- 
creasing the lean oil rate in an existing absorber are described 
by Kneil(5). 

The rigorous design of separation devices such as ab- 
sorbers and reboiled absorbers is of obvious worth to the de- 
Sign engineer. Hand calculations of multicomponent separation 
problems of this type are expensive in engineer-hours. They 
have the limitations of giving only approximate solutions and 
of being unable to properly consider side stream take-offs 
and interheaters/coolers. Furthermore, the time taken to cal- 
culate a single case precludes the trying of different speci- 
fications in an effort to establish the optimum design. 

Several methods of rigorous solution for use with the 
modern high-speed digital computer have been put forward(6,7, 
8,9,10,11,12). All are based on an iterative procedure where 
the trial and error calculation is carried toward a solution 
by the use of successively better values for the column vari- 
ables. These improved values are available as a result of 
the calculations of the previous iteration, except in the 
case of the first iteration where assumed values are used to 
initiate the calculations. 

The various methods available may be classified into 


two groups. 
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1. 'Bubble Point' - Those methods which use the plate com- 
positions to determine the new plate temperatures by a 
bubble point calculation, and then use enthalpy balances 
to determine the new vapor and liquid flow profiles. 

2. ‘Sum Rates' - Those methods which use a summation of the 
component molal flow rates from each plate to give the new 
flow profiles and then use enthalpy balances to find the 
new plate temperatures. 

In both of these groups, the equilibrium and enthalpy 
data used has been provided primarily in the form of analytical 
expressions determined from curve fits of available data. Be- 
cause the fitting of data is time consuming and must be car- 
ried out each time a change in conditions is made, a great deal 
of interest has been taken in general correlations which can 
provide data over a wide range of conditions. The general cor- 
relations which have been developed are based on thermodynamic 
principles(13,14,15,16). Besides eliminating the necessity 
of curve fitting experimental data, they also provide a con- 
sistency between problems and avoid the human errors possible 
in the transcribing of data in the curve fitting procedures. 

A further advantage is that a general correlation can provide 

consistent data for components such as HS, CO, and heavy 

fractions for which there are limited experimental data. 

Of these general correlations, the Chao-Seader cor- 
relation is of particular interest. It has been applied in 


the solution of distillation problems by Cavett(6) and 
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Tatuch(7). Erbar(8) has employed this correlation in a com- 

posite program which carries out flash calculations for various 

specifications as well as bubble and dewpoint determinations. 
Only limited information is available on the use of 

the various calculational procedures for the rigorous design 

of absorbers and reboiled absorbers. No information has been 
published, to date, about the use of the generalized correla- 
tions in the design of these devices. 

The objectives of this work are: 

1. To prepare computer programs for the rigorous design of 
absorbers and reboiled absorbers based on the two general 
calculational methods and to investigate the relative 
merit of the two methods. 

2. To incorporate the following sources of equilibrium and 
enthalpy data into the calculational procedure and evalu- 
ate their use. 

a. Chao-Seader correlation 
b. NGAA equilibrium ratio data and Yen and Alexander 
enthalpy data correlation 
All programs are written in Fortran IV and were 
used on the IBM 7040 computer of the University of Alberta 


Computing Science Department. 
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2. LITERATURE REVIEW 


2.1 Calculational Procedures 


Several rigorous design methods for absorbers and re- 
boiled absorbers for use with digital computers have been pub- 
lished in recent years. Hogsett et al(9) described a short- 
cut computer program for designing absorbers by the modified 
Edminster method(10) which uses effective absorption and strip- 
ping? factors. The specifications required are the number of 
theoretical trays; lean oil and wet gas composition and tem- 
perature; equilibrium and enthalpy data for each component; 
and the recovery of the key component required. This program 
has the advantage of giving fairly accurate design informa- 
tion in less computer time than more rigorous methods and can 
thus be used to advantage in preliminary economic studies and 
as a starting point for more rigorous design methods. 

A sum rates method of solving absorber problems was 
presented by McNeese(1l1) in which the plate to plate material 
balance equations of the column for a particular temperature 
profile are solved to give flow rates and compositions for 
Sachmeray ws his procedure is¥carriedsout in a trial and error 
fashion until the unique value for the temperature profile is 
obtained. Using these new flow rates and compositions, the 
necessary temperatures for thermal equilibrium on each tray 
of the absorber are calculated in a trial and error procedure 


using enthalpy balances. If the new temperatures vary from 
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the former temperatures by more than a specified tolerance, 
the material balance calculation is repeated with the new tem- 
perature profile. Special convergence techniques are used to 
force convergence. The disadvantagesof this method are the 
need for an iterative solution of the flow profiles for each 
temperature profile, . the non-rigorous trial and error 
method of solving for the new temperature profile, and the 
need for convergence forcing techniques. The specifications 
necessary are: the number of theoretical trays; the lean oil 
and wet gas compositions, temperatures and rates; the number, 
location and duty of interheaters/coolers; equilibrium and 
enthalpy data; and the convergence tolerances for the heat and 
material balances. An example problem involving a feed gas 


CO H5,S and hydrocarbons 


of twelve components (including N 5" Hy 


2" 
from methane through heptane), a pre-saturated lean oil (API 
78.3), a column of six theoretical trays operating at 1200 
psia with an intercooler, is presented. The source of data 
is not stated. 

Sujata(12) suggests another sum rates method of solu- 
tion for absorbers and strippers which can theoretically be 
extended to accommodate feeds and interheaters/coolers on 
any or every stage. This method requires the specification 
of: the number of theoretical trays; the lean oil and wet gas 
compositions, temperatures and rates; the number location and 


duties of interheaters/coolers; equilibrium and enthalpy data; 


and the required absorption of the key component. Once a 
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solution is reached where the temperature profile no longer 
changes appreciably between iterations, the calculated key 
component absorption is compared to that specified and the 
lean oil rate adjusted so as to correct the difference. The 
material and heat balance solution is carried out with these 
successively better estimates of the lean oil rate until the 
calculated key component absorption agrees within a specified 
tolerance with the specified key component absorption. This 
method can be extended to rectified absorbers and fractionators. 
Sujata makes no comparison of results to operating data and 
does not discuss the data used in the solution of a two feed 
absorber example. His method works well for columns having a 
temperature differential over the entire absorber of less 
than 100° and may not converge for reboiled absorbers at all. 
Friday(13) describes a method similar to that of Su- 
awe. His program is capable of giving design information 
for distillation and extraction columns as well as absorbers. 
In this paper the various methods of solution used throughout 
the years are classified according to the order in which the 
material and enthalpy balances are solved. The various deci- 
sions that must be made in the formulation of a solution method 
for a design problem are set out and discussed. A matrix 
method is used in the solution of both the material and energy 
balance equations to avoid truncation error buildup. Various 
example problems are solved and compared to results published 


by other workers in this’ field. Friday states that the poly- 
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nomial data which he uses are accurate enough to show that his 
method works. No discussion of the effect of data on results 
is presented. Friday does not present a method for solving 
the reboiled absorber. 

A series of articles dealing with the use of the Theile- 
Geddes bubble point method began in the Petroleum Refiner in 
the issue of June 1959. In the series, the article by Hardy 
et al(14) explains the use of this method for the solution of 
absorbers and describes a method of avoiding the round-off 
error associated with multifeed columns. Three types of spe- 
cification are presented for the absorber. In addition, the 
"QO" method of arranging enthalpy balances so that interheaters/ 
coolers can be introduced to maintain specified flow rates is 
explained. The constant composition method of calculating 
stream enthalpy is introduced to avoid round-off errors as- 
sociated with conventional enthalpy balances. Several example 
problems are presented covering both adiabatic and non- 
adiabatic operation. 

Hardy et al(15) apply the same basic method to the 
case of reboiled absorbers with bottom side streams. Example 
problems are presented to indicate the capabilities of the 


program. 


fe cer Boies Ul Data 
Several correlations providing equilibrium data for 
use in digital computer programs have been presented in recent 


years(16,17,18). The equilibrium ratios of the Natural Gas 
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Association of America, which account for the effect of com- 
position on the equilibrium ratio by the convergence pressure 
concept of Hadden, are presented in chart form as a function 

of temperature and pressure. Analytical expressions represent- 
ing these charts have been prepared by NGAA to give the equil- 
ibrium ratios of the hydrocarbons methane through decane. If 
non-hydrocarbons and hydrocarbons other than the twelve treated 
by the NGAA expressions are to be used, extensive curve fitting 
must be carried out. 

The Chao-Seader correlation(17) is a general correla- 
tion for equilibrium ratios based on fundamental thermodynamic 
relationships. In addition to hydrocarbons of various molecu- 
lar types (paraffins, olefins, aromatics and naphthalenes) , 

H O 


Has ,on ole 


Zee PSP Ba IA 


and heavier hypothetical hydrocarbon fractions over a wide 


it can provide equilibrium data for CO 


range of pressure and temperature. It has the advantages of 
providing a consistent source of equilibrium data from prob- 
lem to problem and can provide a correspondingly consistent 
source of enthalpy data. Other similar equilibrium ratio 
correlations lack this final advantage. The major disadvantage 
of general correlations of the Chao-Seader type is the in- 


creased computer time required to generate the data desired. 


Pipe) Enthalpy Data 


The enthalpy data used in the solution of separation 


problems by digital computer must ideally be available in such 



















-moo to tostts sdxi sot tauosos Ap (Soe | 
eiveestq soneptevnoo edi yd olds mibrditivps of 
doitonut s 2s mot J1sdo mt sSeuaiilaihg cies igi 
-tnsasigsi enoisesiquse [soitylisanh +siyeeetg 8 
-Liupes sft evip ot AAD yd bexsqesq meed ovad einen lege 
11 .ensoeb dpsoxdt onsdtom anodussoubyd ens Ro aoissx mubxds | " 7 
betse1t eviews sft asds terito enodiscotiyd fate gnodassoxbyt—non . rt 
paktsit svivo svienetxs ,bean od oF S45 aminecinnm ate aah? _ 7 
-slex105 Lstemep 5s 2 (TL) noi telex webss@-osd9 en? #: , "4 
oimenybomiods [stnemsbayt no boesd. soitex muiadilivps 2 7 3 : 
-voslom euolisvy to enodissoxbyd of soisabbs mt caqidenobsaies 
(2onelsdtiqsm bus 2oitemozs ,embtele yeabtexsa) eat 
OD, gO yoH yc 18gH 4.09 102 sha venkedttaepe -ebS 7 89 ) a 
sbiw 5 tevo anoistosit any Isoisertsoqydl soivsert . 











to espsstnsvbs oft ead SI .otutet! bas. stveasiq 
-dotq mort stab muiudilivups to somm0R staesalenod: 6. pi | 
tneteianos yipatbaogqesitx0> 5s sbivomg nso bas, meidoxgy te. fol : ‘ er 
oitsx mutidifiups aslimie t9d30 sedsb ygleriine 20 or + 
opsinevbseid xotsm ef? .opsdasvbs Leak? eit aosivanokts tewzo a 










PRPs 


-Beoxieeb stsb edt etstemep ot wea? ane en Be 


“a 
iz 
ear | ie 


ae 54 
a 
ve a ia’. 


* 
aa 
j 


~ai sft ek sqys sobse2-osd) ont 20. LtsLowz Assen) 20. ee 
7 


i} 
as 


roaenar 1 sistas off ott 
cas of beee, t SRE t 


ae 





= Sie 


a form that the individual values of enthalpy can be calculated 
from a general expression rather than in a form requiring the 
interpolation of a table of discreet values. Of the general 
correlations developed in recent years(19,20,21), the two of 
interest are the Yen and Alexander(20) and the Chao-Seader as 
extended by Edmister et al(21). 

Yen and Alexander,using improved Lyderson-Greenkorn- 
Hougen charts have correlated the enthalpy departure of a 
component from ideal gas behavior according to a modified 
theory of corresponding states. Equations are presented for 
four regions: the superheated vapor; the saturated vapor; the 
Saturated liguid; and the subcooled liquid, at selected values 
of the critical compressibility factor, whereby the enthalpy 
departure can be calculated with a knowledge of the reduced 
temperature and reduced pressure. The range of applicability 
of this correlation is varied according to the region being 
worked in. Enthalpies of hydrocarbon mixtures are determined 
using psuedo-critical properties for the mixture as determined 
using Kay's rule. 

The Chao-Seader correlation, as extended to provide 
enthalpy data by Edmister et al(21), calculates the enthalpy 
of pure components, and mixtures of components, according to 
fundamental thermodynamic relationships in a manner which will 
be explained in Section 4.2-2. The data thus provided are 
consistent with the equilibrium data calculated by the 


correlation. 
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2.4 Operating Data 


Operating data for existing columns are scarce in the 
literature. Jackson et al(22) present a complete set of oper- 
ating conditions for an absorber with and without an inter- 
cooler in both winter and summer operation. The feed consists 
Or H,S and hydrocarbons from methane through pentane with a 
lean oil of 35°APTI gravity. The column operates at a pressure 
of approximately 70 psia and over a temperature range of 50 to 
80°F. The absorber is also solved by a short cut design pro- 
cedure and the results compared with those observed from actual 
operation. 

Goldblatt et al(3) provide operating data for a re- 
boiled absorber in a gasoline plant which is used to de- 
ethanize a rich oil from a previous absorber. The equipment 
Operates at approximately 150 psia over a temperature range 
of 85 to 250°F. Compositions and temperatures of the feed 
and product streams are presented for two methods of opera- 
tion using preheaters and reboilers. Unfortunately, the number 
of theoretical plates is not stated. Kneil(5) and Gilmore 
and Bauer(l) provide similar operational data for two other 
reboiled absorbers. Kneil fails to state the number of 
theoretical stages in the equipment while Gilmore and Bauer 
have described a very particular reboiled absorber with a 
complicated intercooler system which cannot be simulated 


with accuracy without more information. 


ied | 
a “" 


ae 

















eh i 


a 
“e Te We 













on 
aa isa ’ 
a a ae G 
eid mi 901802 916 anmuloo paidetxe 102 


-reqo to jea stelqmoo 5 tneeetg (SS$)Ls 39 noedost — sxus6x 
-tetni ms tuodtiw bas diiw xrediords as tot emols tba 
etelenos bsesi siT 


noitszeqo semmue bas aie 
6 aisiw eastneq dpyouds ensdsem mox2 emodzssqxbyd fas SH 20 " 


eiveesrg 6 ts 2eteisgo amuloo sdT .ysivetp ili | 
ot 0@ to spast sausszsqnes 5 ISVO a sieg OV 









Isuso6 moxt bov19edo saent iain bezeqmoo + heat ee | 











=51 5 10% stsb pritsxeqo ebivors aa 4@ ens oat ao 
jnemgivps soit 





-wedioeds evoiveig & nail ey. fess 


epns1 sivtsieqmes & 19Vv0 nied 085 Apidae 
best eft to eetutsxeqmet bas emotsizogmoD _— 


-s19qo to ebortom owt 102 besnsesxq 916 @ ite < ou 
todmun offs ,ylotsnuszotaU .exeliodes bas eopeh 


sxomlid bas (@)lisnt .bestsse tom aa 


xenfito owt 102 stsb Isnoisszego 


si 












oan a ann ih So 
reed bas siomiio efinw o 


+ Aion annonde batter 9 





bows lointe oct 3c 


a ee 


3. COMPUTATIONAL PROCEDURE 


3.1 General 


Friday and Smith(23) give a comprehensive analysis of 
the various methods available for the solution of separation 
problems. Briefly, in rigorous separation calculation there 
are four sets of equations which must be satisfied. These are: 


The material balance equations (A) 


Pineeairia cin-lee Mintle: Sin:  ~ cet 


The equilibrium relationships (B) 


¥ones and inti igr4) 
The summation relationships (C) 
De xoetee 12 0. eee 0 and 
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) vad St 
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The energy balance equations (D) 
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It is in the method of satisfying these equations that the 
various methods of rigorous solution differ. Certain decisions 
must be made regarding these equations before a method of 
solution can be formulated. 

First,in all the commonly used solutions, the four 
equations are dealt with individually throughout the column 


by type, instead of all four being gouped together in a stage 
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by stage procedure. This is necessary because of the round 

off errors associated with the stage to stage method. 

Secondly, the order in which the equations will be used 
must be determined. Equations (A,B) are employed together and 
are satisfied before (C,D) in all cases. However, the order 
in which equations (C) and (D) are solved depends on the next 
decision. 

Thirdly, the decision as to which equation will be used 
to solve for which column variable must be made. The variables 
which must be determined for the column are the plate composi- 
tions, the flow profiles and the temperature profile. The 
plate compositions are determined by the equations (A,B). A 
choice must be made between two alternatives for the deter- 
mination of the flow and temperature profiles. These are: 

1. The Bubble Point Method, where equation (C) is used to 
solve for the temperature profile by a bubble point cal- 
culation and equation (D) is used to solve for the new 
flow rates”. 

2. The Sum Rates Method, where equation (C) is used to solve 
for the flow rates by a summation of the component molal 
flow rates on each plate and equation (D) is used to cal- 
culate the new temperature profile by means of enthalpy 
balances. 

Fourth, a decision must be made as to the method by 
which the equations (A,B) are solved. Because of the round- 


off error associated with some methods, the way in which (A,B) 


- &1 - 
<7, aia A 
, 


brivor sit tO seysoed iene 
-boritem epate ot syste oat aviw & 

beeu sd Litw anoitsspe adit cei ob 46 
bas tsoftsepos beyolqma StS (8, A) —" 


t9b10 edt ,1SvewoH .e9e865 ffs wt (@\D) - 
























jxen ef3 no ebnegeb bovioe e1s (@) Bits ©) 


beeu od [Liw aotisupe dotdw oF e265. notatosb oft veibekar 
esldsixrsv sit .obsm od teum oidstasy scams ena be ovk 






sit .olitord aitncasieeiies eft Sais aelttoxg wolt a | “ ; 
A .(a,A) emoitsyps sit yd benimreteb orn sanisdangmnt 6 ay i. ) 
-1sjt95b oft 10% eovissnxrstis owt asewited sbem od Seem 4 . raw 1: : a 
1938 sesiT -asittorg siutsteqmet bas woli sit to. a: sr ‘ae a 
ot — ei (D2) soistsups exonw .bonseM 3aLod sist oft ok 
-fs5 taiog olddud s yd slirtoxg saneezeqmss ont xot 6 Keng) 


won oft 102 ovloe ot Bean ei (dq) arama tints’ 


m 


ey 
evioce ot beew ef (D) notjsupe ia \borsem casa 


Isiom tnanogmoo oft to noltsmmve 5 yd eotex 
~Iso ot bees ei (dQ) coksnene Oe wal Mone a9 6 


Eyal ea 


are solved must be selected with some care. 

Fifth, a decision as to how to calculate the new tem- 
perature profile from the equation decided on in the third 
decision is required. If the Bubble Point procedure is to be 
employed,any one of the several methodSof determining a bubble 
point may be used. In the case of the Sum Rates calculation, 
a matrix method of solution such as described by Sujata(12) or 
Friday(13) may be used. 

The sixth decision, as to how to calculate the new 
flow profiles from the equation decided on in the third deci- 
sion, is dependent on the method selected of course. In the 


case of the Sum Rates method 
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However, in the case of the Bubble Point procedure, the new 
flow profiles can be determined from the enthalpy balances 
of equation (D) using either 'conventional' or ‘constant 
composition' stream enthalpies. In addition, if there are 
any maximum/minimum restrictions on the vapor or liquid flows, 
the "Q" method of enthalpy balances, as described by Holland(24), 
can be used to establish the duty of any interheaters/coolers 
required. 

In the case of the two types of solution used in this 


work, the Theile-Geddes method, as described by Hardy et al(4,15) 
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is used for the’ solution of-equations (A,B) for both. The 
order and method of solution of equations (C) and (DB) differs, 
however. The first method, which will be called the Theile— 
Geddes method, uses the Bubble Point procedure while the second, 
which will be called the Sum Rates method, uses the Sum Rates 


procedure. 
3.2 Degrees of Freedom 


In the solution of equilibrium stage problems by use 
of the digital computer, ie is necessary to determine the num- 
ber of variables which must be specified to give a unique 
solution. Smith(26) has discussed fully a method of accomp- 
imcninosthus whichis sateributed toekwauk. in applying the 
"design variables" analysis, Smith's nomenclature will be used, 
where C is the number of components and N is the number of 
Suajges. 

Se 2010 Absorber 

Following the procedure described by Smith, the ab- 

sorber in Figure 1 can be shown to have 2C + 2N + 5 degrees 


of freedom. These will be taken up as follows: 


Degrees of Freedom 


Heat leak on each stage N 
Pressure on each stage N 
Stream L, - Rate,temperature, 

pressure and composition C.+ 2 


Stream F - Rate, pressure and 
composition Cor 1 
Stream V(1) - Rate 


Number of stages 
Total ZN -+°2C +5 
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ABSORBER 
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Lo 
(Lean Oil) 
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Intercooler 


NN 


F LNN 
(Rich Gas) (Rich Oil) 


FIGURE 1 





REBOILED ABSORBER 


Vy 
(Lean Gas) 
Lo 


(Lean Oil) 


NQ] (a) Interheater/cooler 


F MNF1 
(Rich Gas) NFI 
NNF1 
NQ2 


CA Interheater/cooler 


NN 
VNT 

25k Reboiler 

(Rich Oil) 
LNT 
(Bottoms) - 


FIGURE 2 
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3.2.2 Reboiled Absorber 
The reboiled absorber of Figure 2 can similarly be 
shown to have 2N + 2C + 11 degrees of freedom. This is deter- 


mined by considering the component sections of the column as 


follows: 
Variables 
(N-1) equilibrium stages = (N-1)(2C+6) = 2NC + 6N - 2C - 6 
1 feed stage S(Gr ee ks) 
1 stream divider C=t=5 
1 equilibrium reboiler Cr +4 
2 sections of the column requiring 
the specification of the number of 
plates in each 2 
Number of variables 2NC + 6ON + 3C +B 


There are 2(N-1) + 3 inter-streams which give restricting 
conditions equal to (2(N-1)+3) (C+2) or 2NC + 4N + C + 2 
Subtracting these restricting conditions from the number of 
unit variables leaves 2N + 2C + 11 degrees of freedom which 


are to be taken up as. follows: 


Heat leak on each stage N 
Pressure ohn each stage N 
Streams L.and F - Rate, Temperature, 
O LANG 
pressure and composition 2Gn a4 


Number of stages above and below 
the feed stage 2 


Pressure and heat leak in stream 
divider 2 


Rate of streams SSR and V(1) 
Pressure in reboiler 


aN + 2€ + ll 
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The addition of a side stream to either of the columns 
would introduce two additional degrees of freedom which would 
normally be taken up by the specification of the rate and lo- 
cation of that side stream. Similarly, in the case of the 
addition of an interheater/cooler, the specification of the 
duty and location would take up the extra degrees of freedom 


introduced. 


3.3 Solution of Equations (A,B) by the Theile-Geddes Method 


The equations of the Theile-Geddes computational 
procedure for solving equations (A,B) are developed below for 
any component 'i'. The component subscript will not be used 
but is to be understood. 

3.3.1 Reboiled Absorber 
A material balance around the bottom of the column in 


Figure 2 and plate 'n' may be written - 
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In this set of equations the variable 'b' is unknown. The only 


variables specified are fh and v., while Sn can be calculated 


F 


from the iteration variables Lae Wf and TA In order to 


solve for 'b' the equivalent values of 1/7’ a0 as defined 


ne 


by equations (3-7), are substituted successively in the material 


balance equations beginning with ee Vase This gives, at n= l 
1, Ve FE 
SS Sp Ase SI ySei ee Uae) 88) (3-8) 
b b b 
where 
AA = Sy S5°53° Sum 
BB = (S,°S, eat SUR Ee obo Sc As 
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Replacing 'b' in equation (3-8) with its equivalent, the re- 


sult is 
b ZT 
502 (3-10) 
d (AA + BB x Ci) (1, + ff) - (Cy xoZ 7} 
where 
7 oe L = CC xX Ve te DDex £ 


O rE 
Having solved for the ratio Baya sna the value*oi"b* 
can be found from the material balance (3-9). With the value 
of 'b' calculated thus, the plate to plate values of 1/7» can 
now be calculated using equations (3-7). 
An alternate method of finding the component molal 
flow rates on each plate is to draw the material balances 


around the top of the column and plate 'n' as follows: 


V V 1 
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AP, = ——7>— (3-114) 
n= 
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the absorption factor of the component on plate n-l. 
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Of the variables in this equation 'd' is unknown. Las fvand 

1, are specified, while AF -1 can be determined from the itera- 
: : ; qt 

tion variables La-1! eae and Ta-1° In order to determine '‘'d', 


the equivalent of Vn-1/9 is substituted successively in for- 


mulas (3-11) beginning with v,/4d =e sthis gives, at plate 
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The value of Vury/o is alternatively available from the re- 











lationships 
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From the overall material balance, 
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Substituting (3-13) and (3-14) into (3-12) we obtain 
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Using the ratio (b/A) 3 oon thus determined, 'd' can be calcu- 
lated from the material balance (3-14). Using this value of 
'd', the quantities 1/4, £/dvand 1,/d can be calculated and 
the plate to plate values of v/d determined from equations 
Gt) 
Round-Ofisksror 

As mentioned by Hardy et al(15), the values of (SAS da. 


and (b/d) give identical results for most problems, while 


down 


the values of b/d calculated by the equations 
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the "round-off error ratios" 
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are calculated. The ratio which most closely approaches unity 


is the one with the least round off error. co Rrop is closest 
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to Uunaty, thenpthe 1/b calculation is the most correct for 
this component and the V,/2 will be calculated from the 1/b 
by the equation 


Vv 1 b 
a Pee oe Be (—) 


d b as q “P 
If Raor is closest to unity, then the v,/4 calculation is the 
most correct and the 1/7’ will be calculated from the v/a by 
the equation 
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While it would appear that the identical results for (b/d) 36 


ance (b/d) reported by Hardy et al(15) make the calculation 


down 
of both of them unnecessary, this is not the case. In prob- 
lems involving components heavier, say than octane, and a 
large number of plates, the successive substitution of the 
stripping and absorption factors in the determination of 

1D/ dys and (b/d) aon produces numbers outside the limits of 
the computer. Because the computer replaces the numbers out- 
Side its limits with those limits the computation of (b/d). 


p 


may be in error, making the calculation of (b/d) unneces- 


down 
sary. 
3.322, Absorber 
A material balance for any component 'i' drawn around 


the bottom of: the column in_Figure 1 and any plate ‘n-1" may 


be written 











tot tosrro> teom sds ver mol 


d\ { eft mox? betsivolao ‘a — at 


2 ¥ oa f\ - ois 
Wo x ne a. ti ce: 


efit eit nottelvwolso B\ v sis aesdt rere os sesa2ols . 
yd B\_v eds mot betsluolso sd — ainaienien: f 


bri, nee oor 


ath: ES 
2 é ¢ - a 
(dy x : t 
ohn 


qu (PNA) xo? ativesx Iscisnebi oft sad3 diliegi biuow ae pLis im ; 
ehaaueha eit saAsm (ci)is ts ybreH yd Bbetxoge1 me 
-dorg mI .se60 oft Jon ei aid ARSRROenS Aes? 


* | 
6 bas ,emsioo asdt yea ,t ssivesd aicaedopubs. 


ait to nottusitadue oviaesoode eit ,aetsiq i 


‘Ene OP, oe) te 
to moltsaimyeteb oft mi erode molsquoeds bas shag y 
yerae | = .\ : 


: ? ik ae 
-tyo axsdmun sds esosigqsx bee RC c 
- “ea® 


, (B\d) to notsssuqmos ers adtimil se Y dtiw + 










to etimil sds sbietvo exsdmun 


7 exch 3 part 4 : 
~goveray 4, (B\d) te noitsiuolss ot ae .tor19 tf 
“ - ep ie : 
“an: qi 


Puy a 4 Ay 


bavots awetb 't£' staenoqmo> ss eceadlee me 3 


te —« B.. 


yem 'I-c' otsiq yas bas £ exupit ni | 


a take ae 
17 a 7 


¥ 
Tose ueise | 


Oat at ac Veh Pig 











b r £ 
n-l 
= SSeS ey ah (aay 
b b b 
where 
v Kn 
Ne NN<n<2 
L 
n 


In this equation, the only variable specified is 'f' while the 
term Sn can be calculated from the iteration variables Livy 
and Ta Me) Sleplidel Beran dele 5 1/2 is substituted successively 
Un Oeequationa(?3—-17), beginning with Lign/? =o thi ssresults, 


at n-l,in the expression 


1, ie 
— = AA + BB(1l - -) (2-18) 
b b 
where 
AA = (8,8, Sum? 
BB = (S,°S,° a. shoe cil + (S)°Sj--- Soere 9)! 
+ + Sy + 1 


beets) wars (3-19) 


Replacing 'b' in equation (3-18) with this equivalent gives 


b 13 BBYx £ 
(me) = = 
awk. (RA ap 5) = ae) leet Ber ) 


(3-192) 





With this value of (b/o) ap in terms of known variables, '‘'b' 
can be solved for using the material balance equation (3-19). 
The plate to plate calculation of 14-1/? can be carried 


out by substitution of the value of 'b" into equation (3-17). 
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By drawing a material balance for any component around 
the top of the column and any plate n, the following equation 
may be written 


Vv Yen, 1, 
ar )+1-— (3-20) 


d d d 





In this equation, the variable Lo is known while the term 
AF -1 can be calculated from the iteration variables Vie Lo 
and Th By successive substitution of the value of v,/4 in 


equation (3-20), beginning with v,/4 = 1, the equation below 


is obtained. 


Vv 1 
IM 20 ps 3 a = = (3-21) 
d d 
where 
AA = (AP un’ seers AF,°AF,) 
BB = (AP ny’ Sia AF ,) + (AP un’ AF 3) re iG oF Aun + 1 
However, Vun+1 = f and, pby Material” batance, 
lo + £ 
= ee 3-22 
d Pop vi ) 
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Substituting these values of 'd' and'f' into equation (3-21) 


gives 
b AA + BB(1, +e) Mean Y(t ct BX 1)) 





( (3-22a) 
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Using the value of (b/d) 3 own thus determined, 'd' can be cal- 


culated from the material balance (3-22). 
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With this value of "d", the plate to plate calculation 
of v/a can be carried out using equation (3-20). 
Round-Off Error 

As mentioned in the section about round-off errors in 
the reboiled absorber calculational procedure, the b/d ratios 


calculated from the values of 1/»b and v,/4 by the equations 
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oy ee 

2 Sy x ai 
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NN 
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may contain round-off error while 7) Te and (b/d) gown doenot. 


To determine which of ears and (b/d) ottom contains the 
least round-off error, the round-off error ratios Rrop and 
Raor are *caleutatedVancd=chmpared Tor@their=-proximity to -untty. 
(2) top (apegence 
S2oE:ion 42) aBOPalang®, aces 
d‘ up d’ down 


The b/d ratio and the corresponding variable 1/» or v,/or 
which appear in the round-off error ratio. most closely ap- 
proaching unity, are used in all subsequent calculations in- 
volving component molal flow rates. 

Atechisspoint, swithethesequations (A,B) solved™to.give 
values for -1,/’; and Mp / oa the two different methods of 
solving the equations (C) and (D) will be described. These 
methods are the “bubble point" method and the "sum rates" 


method. 
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3.4 The Bubble Point Method 
3.4.1 General 

This method, which calculates the new temperature pro- 
file by a bubble point calculation of each stage, and which 
determines the new flow profile by enthalpy balances, uses a 
forcing technique called the 6 convergence method to adjust 
the material balance solution so that it satisfies a top pro- 
duct specification. This technique and the enthalpy balances 
used will be described in subsequent subsections. The bubble 
point calculation will not be described but may be seen in the 
subprograms BUBPT in Annex 5 to Appendix C and Annex 5 to Ap- 
pendix D. 

3.4.2 6 Convergence Technique 

The 6 convergence method, proposed by Lyster et al(27) 
has been adapted to the problem of absorbers(14) and reboiled 
absorbers(15). The 6 procedure assists convergence by ad- 
justing the solution of the material balance equation in each 
iteration so that the specification ae d= DS, is satistied: 
This is done in the following Pee ETC subscripts 
will be omitted in all subsequent equations but should be 
understood.) 

To relate the calculated value of b/d, (b/d) ,ar with 
the corrected value of b/d, (b/d) oor (which satisfies the 
specification of top product, (DS), and the overall and com- 


ponent material balances), an empirical expression was de- 


veloped, as defined by 
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The component material balance requires 
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which by rearrangement and the substitution of the equivalent 
of (b/d) A, from equation (3-24) gives 
oe ae 1, 
d SS z 
cS a Pays) ae 
dca 
The specification of top product requires 
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The desired value of 6 is the one which makes both 


Sides of equation (3-26) equal or gives g(@) = 0 where 


g(6) = 1 ay - DS 
In order to solve for the @ which will make g(6) = 0, Newtons 


approximation is applied where 
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When the correct value of 6 to make g(6) = 0 has been found 


by successive applications of Newton's method, the corrected 


values of d and b can be calculated from equation (3-25) and 
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the expression 


respectively. 


The corrected mole fractions for each plate are then 


calculated as follows: 


1, 
ors ca * Dao 
Xn = Sp (3-27) 
n 
) = ca * as 
n 
qe ca * doo 
y 2 SS (3-28) 
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The Reboiled Absorber with Side Streams 

The determination of 8@ factors for columns with side 
streams is described by Lyster et al(28). In addition to the 
8 required to correct (b/d) Var a @ is needed to correct the 


(w/d) O43 ratio. 
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Also, the side stream product specification (SSR) must be 
satisfied in addition to the top product specification and 
the overall and component material balances. The requirement 
of the component material balance is 
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which may be rearranged using equation (3-29) to give 
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These expressions may be formed into the 'g' functions 
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g5 (04,65) G2 Pew. - SSR 
The values of 84 and 85 desired are those which make Gg, (8,785) 


and G5 (8,785) equal to zero. These values are found by 


applying the Newton-Raphson method. 
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Evaluating the partial derivatives and rearranging the equa- 


tions (3-30) with use of the fact that J, (65795), 44 and 


Jo (81185) y 44 are zero for the proper values of 6. and 6 
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following expressions are obtained. 
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These equations may be solved simultaneously for 8), 85. 
This method of correcting 84 and 85 is repeated unt 
the values of 85 and 8. make rT and 35 equal to zero. Then 
the mole fractions on each plate are corrected according to 
equations (3-27) and (3-28). 
3-45) enthalpy Balances (for the) Absorber 


In the bubble point method, correction of the vapor 


the 


Ca 


nik 


and liquid profiles are made at the end of each iteration by 


means of enthalpy balances. The stream enthalpies required 
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can be determined either in the 'conventional' or 'constant 
composition' methods, both of which are described below. 
Conventional Enthalpy Balances 

An enthalpy balance around the top of the column in 


Figure 1 and any plate 'n' gives 


jeeal) 
+: : oF (3-31) 
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A material balance drawn in the same manner yields 





n fe) af new 
or 
L ves: V+ bye vy (3-32) 
Substituting the equivalent for Lo-l into (3-31) gives 
n=1 
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Vv, = (3-33) 
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n-1 
Constant Composition Enthalpy Balances 

Holland(25) has stated that the term (HL _ lieas can 
produce considerable round-off error in problems containing 
only very light and heavy components such as absorbers. This 
term is sensitive to changes in temperature and composition 
because ne and fsa) are approximately equal in cases where the 


vapor phase is made up of very light components while the 


liquid is composed of heavy components. Because of this near 
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equality, small errors in the determination of the terms of 
the denominator in equation(3-32) cause large errors in the 
evaluation of Vie Holland devised the constant composition 
method to avoid this problem in the following way: 

Writing the enthalpy balance around the top of the 


column in Figure 1 and plate ‘'n-l', 
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Substituting the value of Viner from equation (3-35) into equa- 


tion (3-34) gives 
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where 
Ae 
HAC xeae) = H x 
se is) i=1 nea ap 
NCP 
H(x)) = B =e 
i=l ai i 
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The vapor and liquid profiles are determined using equations 
(3-36) and (3-37). In this method the denominator consists 
of the difference between the enthalpy of a vapor and the en- 
thalpy of a liquid of the same composition, or approximately 
the latent*heat of“yaporizdéion of~Ehe’mixture. This’ pre- 
cludes the possibility of the denominator being very small 
or of negative value as is a possibility in the case of con- 
ventional enthalpy balances. It is recognized that the equa- 
tion (3-35) "is only”’correct when the material balance (3=37) 
is correct, i.e. when convergence is obtained. It is possible 
that this requirement assists in the forcing of convergence. 

3.4.4 Enthalpy Balances for the Reboiled Absorber 

As is the case with absorbers, there are the two 

methods of evaluating the corrected vapor and liquid flow pro- 
files in the solution of reboiled absorbers. The equations 
are developed in the same manner as described in Section 3.4.3 
for absorbers. Consequently, only the final equations for re- 


boiled absorbers are given below. 
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Conventional Enthalpy Balances 
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Constant Composition Enthalpy Balances 
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3.5 The Sum Rates Calculational Procedure 


in. the sum rates method of solution: of equations (C) 
and (D), the component molal flow rates on each plate are summed 
to determine the new flow profiles and then the new tempera- 
ture profile is determined by means of enthalpy balances on 
each plate. The mole fractions of the components on each plate 


are calculated from the equations 
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The flow profiles are given by 
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The enthalpy balances used in the determination of the change 


to be made in the temperature of each plate are 


i ee © aA 
EB, = -Q, - FEH, + b,h, + V,H, = VjH, (3-42a) 
gs leh, Mpaitlt ag a, La SU REE 

: (3-4 2b) 
Vint ntl 
Exy = Onn > PEA 7 °Syw-22yn-1. 7 nw? nw 
Te NAS (3-42c) 


NN NN 


. ' ‘ a 
(D>) anottsups to moktuloe 20 Bostsean 


floss 10 eatsx wold Ielom A 


siq 


bemmva sts sz 


—Sisqmnset won 


iste) eoonsisd 


steiq fiass mo atnsnoqmon oft %0 enotssnat of 


(sO0h-€) 


o. 
bm 
a 
t 
mM 
— 


(5S5~€) 


niga + aa 


. 









\ 
siubeaco01d Isao) 


; 


cn noe , — 


eit aeld Sas aoithaug wok t we 


yqientae to aeom: ya 


> = 


‘3 _ 2 ji v s 
A <5 —_, f rem a 
ancitsups oft Saf smeeaee 
3 / : | , ‘ : nA 
1 nn 7 ve a) oy 
| : ‘~__ a - as 


bf 'bh 
ai* ® 


= 


_ 
un" I 


-) 


= 69 


If the existing temperature profile were correct, En hor sada: 


values of 


that this is true, Newton's approximation is used where 
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To adjust the temperatures so 
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The terms 3H/3t and dh/at are, in fact, the heat capacities 


of the vapor and liquid streams at temperature =. 
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evaluated in this work by numerical differentiation of enthalpy 
over a small increment of temperature. Because the desired 
value of (El is zero, the equation (3-44b) for plate 'n' 


could be written 
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When written in matrix form the equations (3-45) form a tri- 
diagonal matrix which may be solved by the method described 


By Friday (#8). Eliminating At. 4 from the set of equations, 


the ned member becomes 
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Using the equation (3-46), the values of At. may be solved for 


each plate, beginning with 
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The change in temperature is then applied to the existing 
temperature profile and a new iteration begun. 

The equations apply equally to the absorber and the 
reboiled absorber, differing only in the values of Qn and FEH 


applied at the various plates. For the absorber 


FEH) = the enthalpy of the absorber oil stream 
FEB = the enthalpy of the wet gas stream 
OF = the intercooler/interheater load for any 
plavcewn 


For the reboiled absorber 


FEH, = the enthalpy of the absorber oil stream 
FEBS = the enthalpy of the feed stream 
eg cy the intercooler/interheater load on any plate n 
One = the reboiler load 
FEH = “the enthalpy of the feed stream 
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4, DATA SOURCES 


4.1 Natural Gas Association of America Polynomial K Data 


The Equilibrium Ratio Data Book of the Natural 
Gas Association of America contains a series of charts re- 
presenting the equilibrium ratios of twelve hydrocarbons 
according to the convergence pressure principle of Hadden. 
These charts, for methane through decane, have been "curve- 
fitted" for both temperature and pressure variations. The 
resulting analytical expressions, which are presented be- 
low, have a double set of coefficients for each component 
at each convergence pressure. 


fi 
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The coefficients"b, ." are available from the N.G.A.A. 
in list and card form. The obvious advantage of this source 
of K data is its utility. In the case of both the absorber 
and the reboiled absorber, the convergence pressure will re- 


main reasonably constant throughout the column. This is so 
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because the convergence pressure is dependent on the liquid 
phase weight fractions which are dominated on all plates by 
the absorber oil. Working at essentially one convergence. 
pressure, it is possible to change the pressure of the 
column when desired without the further curve-fitting that 
is necessary with the usual temperature variable polynomial 
tr. 

Convergence pressures were calculated by the method 
of Winn (29) on a lightest component free basis. The data 
in this correlation covers the convergence pressures from 
600 to 20,000 as presented in the NGAA Equilibrium Ratio 


Data Book. 


4.2 Yen and Alexander Enthatpy Correlation 


Yen and Alexander (20), using improved Lyderson- 
Greenkorn-Hougen charts, present a series of equations for 
the machine computation of vapour and liquid enthalpies for 
hydrocarbons. The charts, which correlate the enthalpy de- 
parture of a component from ideal gas behaviour with its 
reduced pressure and reduced temperature according to a 
modified theory of corresponding states, were divided into 
four regions: the super-heated vapour region; the saturated 
vapour line; the saturated liquid line; and the sub-cooled 


liquid region. For each of these regions equations were 
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developed to represent the enthalpy departure at the following 
values of Zi 2, = On32.3:3 Zea” rae ee 0.27; tes 0.249.. The 
expressions for the last three of the regions at the various 
values of Z, are presented in Appendix A. The super-heated 
region is not included as it is not applicable to the separa- 
tion problems considered here. 

Yen and Alexander (20) state that the analytical 
expressions reproduce the data of the charts with a maximum 
Srroreo: £)0.1 BIU/1Lb., mole Re while the charts themselves 
have an average deviation of 5 BTU/lb. from the literature 
data used in their preparation. 

Mixture enthalpies are determined by using Kay's 
rule to give the psuedo-critical: properties of the mixture 


and then substituting these properties in the appropriate 


equation. 


The ideal gas state enthalpies are calculated from 
an equation of the form, 


De eC His aoe DEG) 
1000 1000 1000 











0 
<= = + BH 
(Hy H,) AH ( 


with T = ote) 












evolrsv oft 36 anoiye: edt to | 
betsei-reque edT A xo | 
-sisqse efit ot eldsoilqgs ton ed ths 


Isoidyisas soll teat otese (05) abaacoth Se ast ae 
munixem s diiw etisdo edd 20 stab ead @ 
2evisemors etisio offs ofinw. bialivenibsambabiesatien <i) 


exustsrssil et mott . 
2e'ysd pitey yd bonimressb ots Fampneenice: 


owdxim ent 20 eeltregoxg intend ans 
sts trqoxggs ois Pisa eoisiegong 6 


ipniep SS eae 


wont | . ——_. ii 
Tene hay 
' : fe ie 

as . 


alae AB ca 


where the coefficients AH, BH, CH, and DH are determined 
from a curve fit of the data of Rossini (30) using Forsythe 
polynomials as described in Lapidus (31). Values of these 
coefficients are listed in Appendix A, Table l. 

The limits, within which this correlation is valid 
are: 


a. Saturated Vapour Orla < Bs < pla0 
Dew Saturated liquid URL Re P Sind By 8 


Cec uUDeCOOLeEGs iguid. (0, 01i'< P.. <5 0 


GC a5e< TY <i Lee) 


where TY and Pee are the reduced properties of the mixture 


or component being treated. 


4.3 The Chao-Seader Correlation 


The Chao-Seader correlation (17) for predicting K 
data, extended by Edminster et al (21), provides a con- 
sistent set of equilibrium and enthalpy data for hydrocarbon 
mixtures. The method of calculating the data is suitable for 
the machine computation of multi-stage, multi-component 
separation problems. The correlation as described by Erbar 
(8) is used in this work. 


The Chao-Seader correlation determines K values 


from the relationship 
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where H; is the f/p ratio for the liquid phase 

Ye is the liquid phase activity coefficient 

os is the vapour phase fugacity coefficient 
The f/p ratio for the liquid phase of a component is a well 
defined quantity when the component is actually a liquid. 
However, when the pure component is a vapour at the con- 
ditions of interest, the liquid f/p ratio has no actual 
meaning. To assist the handling of mixtures at conditions 
of this sort}, the¥correlation of the liquid fugacity co- 
efficient has been extended by calculations from experimental 
data to include such conditions. This has been done within 
the frame work of the modified principle of corresponding 
states of Pitzer. The first term on the right hand side of 
equation 4-1 represents the fugacity coefficient of a 
simple fluid while the second term represents the correction 
for real fluids. 


ue is calculated from the formulae 


log u, = log Ws + w log Ws | Ben) 
where log u, = Aj+ A,/T, + A2T, + AQT ).* + A, na + 

(A. + A,T + A.T_*) are Nf Bieees log P, 

log u, = 4.23893 _ 8.65808 T, - 1722060/T) 2-03-15224 
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The generalized constants used in the calculation of uy are 
the same for all components other than the following five: 
methane, nitrogen, hydrogen, carbon dioxide, and hydrogen 
sulfide. Each of these components has its own set of con- 
stants. The components oxygen and carbon monoxide use the 
same constants as methane. 


y. 1s calculated from the Scatchard-Hildebrand 


ut 
equation 
ind & 2 
ln Y; = Vi; (o, 3) 
3. Xs Vi; 
where Fo po eee (4.2) 
XV Le 
- bi 


The use of this equation includes the assumption that 
liguid.solutions of hydrocarbons are regular solutions fe: 
solutions with zero excess entropy of mixing. The term an 
is the average solubility parameter of the solution as defined 
by equation 4.2. 

¢ is determined using the Redlich-Kwong equation of 


state in the form 
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zZ is solved for by trial and error, formula 4.3 being implicit 


in Zz. Once having calculated z 
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4.3.2 Enthalpy Values 


Vapour phase enthalpies are calculated from the 


following equation: 


A 4 B_P 
0 
H Sty, H+ 5 ge ina + By +1-2 


oe 

The first term of this expression represents the enthalpy of 
the mixture at the ideal gas Bhuctas of zero pressure while the 
second term represents the deviation from ideality due to 
pressure. It is derived from the Redlich-Kwong equation of 
Reaves 


Liquid phase enthalpies are calculated from the 


following relationships 
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Again the first term of the equation represents the ideal 
gas state enthalpy while the second term represents the 
deviation from ideality. 

The values of the constants, of z, and of the composi-~ 
tions are those which are used in the calculation of the K 
ratios already discussed. Bo) the ideal gas state enthalpy 
of a component is evaluated from a cubic equation in temperature, 
the constants of which are listed in Table 5, Annex AS for 


each of the components encountered in this work. 


Ome 2 eee (Wee 12) 
He = AH; + (BH; )T + (CH, )T + (DH, )T witn © ino! 


4,3.3 Hypothetical Components 

A means of handling complex hydrocarbon fractions, 
such as heavy absorber oil, is described by Erbar(8) as 
modified from Cavett's method (6). The minimum information 
required for a component is the API gravity, the molecular 


weight and, either the mean average boiling point or the molal 
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average boiling point and the cubic average boiling point. 
From this information the data required for the equilibrium 
and enthalpy calculations are produced by use of the 
following equations: 
The mean average boiling point, if it is not specified, 
is calculated from the cubic average and the molal average 


' boiling point which must be specified in this case. 


BP oa + BP la 
BP a = 
2 
The liquid molal volume Vl is calculated from 
MW 
Vii = a@25°c 


where d @ 25% = (0.98907) (Sp. gr. @ 60°F) 
ia leno 


where (Sp.gr. @ 60°F) woe ee 
131.5 + SAPI 


Psuedo-critical properties: The psuedo-critical 
temperature is calculated by the equation: 


= 2 3 oan 
T F289 AE a,T + aoT + aT + ay AT + ag AT 


2m2 
acA L 


T = the molal average boiling point, if available, 
or the mean average boiling point in Ope 

Dos ae L Gravity 

The psuedo-critical pressure is calculated in psia 


by the equation: 
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= 2 3 2 
Log Pa bts b,T + boT + b.T + b AAT + beAT + 
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2 2m2 
DeATT + by ACT 


where T = mean average boiling point in ora 


A = API gravity 


If either the critical temperature or the critical 
pressure of the fraction have been specified, the respective 
calculation of the psuedo property is bypassed. See Sub- 
program PHYS Appendix D, Annex A, for the equations above 
with the constants included. 

The accentric factor w is computed according to 


Edminster's equation 


3 log(p_/14.7) 
C 
SS Sg (— ) - 1.0 
T/T, - 1,0 


The solubility parameter is calculated as follows: 


a AHv 25% ~ pace 
= Wa, 
2 
; : T - tAapO. 38 Ai 
where HVon0g = ( ———_— vee 
ae 
C b 
AHV. pp = (7.58 + 4.571 log Ty)x Ty 


The constants required for the ideal gas state 


enthalpy equation 
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are calculated from the following equations: 


AH 


2 3 2 3 
MW(C) a2 C,A uy C5A te C3A + CK a CK ate Cok + Cy gAk 


K + C,.K2 +. Cc, .K3 


3 
ey ae ag 12 ie 


BH 


*. 
MW (C. + Cea ‘ CoA ay Cio 


CH = MW(C, , ae CA) 


DH = MW(C, ¢ + C1 7A) 


where A = “API 


K 


the U.O.P. characterization factor 


The limitations of the Chao-Seader correlation are: 
a. For hydrocarbons (excluding methane) 
Reduced temperature ... 0.5 to 1.3 based on pure 
component critical temperatures 
Pressure ... up to 2,000 psia but not to exceed Pe 
of 0.8 based on the psuedo-reduced pressure of 


the mixture 
Bb. For light gases (H. and CH) 


Temperature ... -100°F to 0.93 psuedo-reduced 
temperature of the equilibrium liquid mixture but 
not to exceed 500°F. 


Pressure ... up to 8,000 psia 


Composition ... up to about 20 mole % of dissolved 


gas in the liquid. 
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5. DESCRIPTION OF PROGRAMS 


5.1 Absorber - Bubble Point Procedure 


DS tel Specifications 


The specifications required for this program are 


those of Section 3.2.1, namely: 


ao 


adiabatic operation, 
column pressure, 


composition, rate, pressure of streams Ly and Fy 


Temperature of stream Los 
rate of stream Vie 
number of stages, 


convergence tolerances for 6, Vie and temperature 


change from iteration to iteration. 


An initial assumption of the temperature, liquid and 


vapour profiles is required to initiate the calculational 


procedure. 


This is true for all the other programs as well and, 


although this statement is not repeated with each set of 


specifications, it is to be understood. 


ay hae Capability of the Program 


This program will provide a solution for an absorber 


problem i.e. the temperature profile, the liquid and vapour 


flow profiles, and the product compositions are calculated. 
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5.1.3 Sequence of Computation 


The sequence of calculatton for the solution of the 


absorber using the bubble point procedure is shown schematic- 


ally in the flow diagram, Figure 3. In step form, the 


sequence is: 


ao 


Define problem 

(1) Read in problem data. If the Chao Seader 
correlation is being used, calculate the physical 
constants for any hypothetical components in sub- 
program PHYS. If the NGAA K values are being used, 
calculate the coefficients for the polynomial in 
temperature at the operating pressure of the column 


using subprogram PHYS (K Const) 
(2) Calculate mole fractions in feed streams. 


(3) Print out problem statement. 
Calculate Rn 
(1) Calculate the equilibrium ratios for each 
component on each plate. If the Chao-Seader 
correlation is used, calculate ideal K ratios 


for the first iteration using subprogram KIDL. 


Solve material balance equations 


(1) Calculate the absorption and stripping factors 


efit to ijslor sa% tot noiss. 
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for each plate using equations 3.7e and 3.11d. 


(2) Calculate the 2), ratio using equation 3.19a. 


(3) Calculate the (2) ratio using equation 3.22a. 


down 
1 
(4) Calculate —5 using equation 3.17. 
v 
(5) Calculate 7 using equation 3.20. 


(6) Calculate round-off error ratios using equation 3.23. 
V 
(7) Correct 45 or ~ throughout the column. 


for each component in turn. 


Convergent 

(1) If overhead product, 6 and temperature change 
between iterations satisfy convergence tolerances, 
calculate the feed temperature by trial and error and 


print out the solution to the separation problem. 


6 Convergence 


(1) Calculate the 6 necessary to force convergence, 


according to section 3.4.2. 


Ap t3¢ 3 and y. 
Correcte ijn Yivn 


(1) Calculate the corrected component mole fractions 


on each stage using equations 3.27 and 3.28. 


New temperature profile 


(1) Calculate the new temperature profile by deter- 
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mining the bubble point of the liquid stream from 


each plate using subprogram BUBBT. 


Hie New vapour and liquid profiles 
(1) determine the new vapour and liquid profiles 
using stream enthalpies calculated by; 
(a) the conventional method with the Chao-Seader 
correlation (equation 3.31) 
(b) the constant composition method with the 
Yen and Alexander enthalpy correlation 


(equations 3.36). 


i. Return to step b. with the new temperature, 


vapour and liquid profiles. 


5.2 Reboiled Absorbers - Bubble Point Procedure 


Sig, ee Specifications 


The specifications required for this program are those 
detailed in Section 3.2.2, namely: 

a. adiabatic operation, 

b. operating pressure 

¢. composition, rate, temperature, and pressure of 


streams Ly and F, 
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d. rates of streams Vi and SSR 
e. number of stages and feed stage number, 
f. convergence tolerances for 6, Vie SSR, and 


temperature change from iteration to iteration. 


Si ARP Capabilities 


This program will determine temperature profile, the 
vapour and liquid profiles, product stream compositions, and 


the reboiler load for.a specified reboiled absorber. 


BS PA Sequence of Computation 


The sequence of calculations in the solution of the re- 
boiled absorber by the bubble point procedure is much the same 
as that for the absorber. For this reason, the computational 


sequence, which is described below in step form, has the same 
flow diagram, Figure 3. 
a. Define problem 
(1) Read in problem data. If the Chao-Seader 
correlation is being used calculate hypothetical 
component physical properties using subprogram 
PHYS. If the NGAA K ratios are being used, 
calculate the temperature coefficients at the 


column pressure using subprogram PHYS (K const.) 
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(2) Calculate the vapour/liquid fraction of the 
feed, feed enthalpy, and the mole fractions of 


the feed according to its condition. 
(3) Print out the problem statement. 


Be Calculate K. 
nasal 


(1) Calculate the equilibrium ratio for each 
component on each plate. If the Chao-Seader 
correlation is being used, calculate ideal K 
ratios for the first iteration using subprogram 


KLDL. 


Ce Solve material balance equations 
(1) Calculate the AFL and Sy using equations 3.7e 
and 3..L1d; 
(2) Calculate (2) up using equation 3.10. 
(3 je Catentate (@) down using equation 3.15. 


(4) Calculate a using equation 3.7. 
V 
(5) Calculate —; using equation 3.11. 


(6) Calculate round off error ratios using 


equation 3.16. 


l V 
(7) Correct — or —; throughout the column. 


Ve Convergent? 


(1) If overhead product, side stream product, 6, 
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and temperature satisfy convergence tolerances, 


print out the solution. 


6 Convergence 
(1) Calculate the 6 necessary to force convergence 


according to. Section 3.4.2. 


Corrected x. and y. 
cE age Yivn 


(1) Calculate the corrected component mole fractions 


on each plate according to equations 3.27 and 3.28. 


New T profile 
(1) Calculate the new temperature profile by deter- 
mining the bubble point of each liquid stream 


using subprogram BUBPT. 


New V and L Profiles 
(1) determine the new liquid and vapour flow profiles 
using the stream enthalpies calculated by 
a. the. conventional method if the Chao-Seader 
correlation is being used (equation 3.38) 
b. the constant composition method if the Yen 
and Alexander enthalpy correlation is being 


used (equation 3.39) 


Calculate the reboiler duty according to equation 3.38g 


Cio woo G.. 


Return to step b. with the new temperature, vapour and 


liquid profiles and begin a new iteration. 
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5.3 Absorber —- Sum. Rates Procedure 


5.3.1:Specifications 


The specifications for. this program are the same as 
those for the absorber by bubble point procedure with the 
following exception: 

a. The feed temperature is specified and the rate of 


Vi is not specified. 


Dee Capabilities 


This probram will calculate the temperature profile, 
the liquid and vapour flow profiles, product stream composit- 
ions, and product stream rates for the specifications of 


gection 5.3.1. 


ip pes) Sequence of Computation 


The sequence .of.calculation for the solution of an 
absorber problem by use of the sum rates procedure is shown 
schematically in Figure 4 and. is described in step form 
below. 

a. Define the problem | 

(1) Read in problem data. If using the Chao-Seader 

correlation, calculate the physical properties of 


the hypothetical components using subprogram PHYS. 
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FLOW DIAGRAM 
SUM RATES METHOD 
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FIGURE 4 








b. 


C. 


Calculate K. 


~ 63 - 


(2) Calculate feed rates, feed mole fractions, 
and feed enthalpies 


(3) Print out the problem statement. 


n 
(1) Calculate the equilibrium ratios for each com- 
ponent on each plate. If using the Chao-Seader 
correlation, calculate ideal K ratios for the first 


iteration using subprogram KIDL. 


Solve material balance equations 


New 


(1) Calculate AF, and Sy from equations 

3.2@-and 3.11ld. 

(2) Calculate (3) up Using equation 3,19a for 
absorbers, equation 3.10 for reboiled absorbers. 


(3) Calculate CO acwt using equation 3.22a for 


absorbers, equation 3.15 for reboiled absorbers. 

(4) saver) tet equation 3.17 for absorbers 
equation 3.7 for reboiled absorbers. 

(5) Calculate = using equation 3.20 for absorbers, 
using equation 3.11 for reboiled absorbers. 


z Vv 
C/E Correct oe or —; throughout the column. 


Land V profiles 


(1) Calculate the new liquid and vapour profiles 
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using equation 3.41. 
(2) Calculate the new component mole fractions 


using equation 3.40. 


e. New T profile 
(1) Determine the new temperature profile using 


the sum rates method described in Section 3.5. 


En Convergent? 
(1) If the change in temperature on each plate is 
greater than the specified convergence tolerance 


return to step b. and begin new iteration. 


g. Results. 
(1) Print out the solution to the separation 
problem in the form of component molal flow rates 


in product streams, flow profiles and temperature 


profile. 


5.4 Reboiled Absorber - Sum Rates Procedure 


5.4.1 Specifications 

The specifications for this program are the same 
as those for the reboiled absorber by the bubble point pro- 
cedure with the following exception: 


a. the reboiler load is specified and the overhead 


product is not specified. 
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beac Capabilities 


This program SHOULD calculate the unique temperature 
profile, liquid and vapour profiles, product stream compositions 


and rates for the specifications of Section 5.4.1. 


5.4.3 ‘Sequence of Computation 


The sequence of calculations described in section 


5.3.3 is used. 
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G. RESULTS 


In this section, a brief description of the example 
problems attempted and several tables for comparison of re- 
sults will be presented. Complete problem statements (with 
the initial assumptions made) and complete results are pre- 


sented in Appendix F. 


6.1 Example Problem Statements 


6.1.1 Example Problem No. 1 - Absorber 
This absorber problem is described by Hardy et al 


(14) as number 16, and is solved by Friday (10) as problem 
4. 


The problem specifications are: 


Components f£ 1, 
(moles) oles) 
CH, 70 0 
CoHe 2 ses 0 
C3H, 10 0 
nC, 4 0 
nC, 1 0 
NC. 0 20 


Pressure = 300 psia 
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Ue = 85.0 moles 
Number of Theoretical Stages = 8 


Lean Oil Temperature 90°F 


This problem is solved using 

a. Bubble Point Procedure with 
(1) Polynomial data of Hardy et al (14) 
(2) NGAA and Yen and Alexander data 


(3) Chao-Seader data 


b. Sum Rates Procedure 
(1) Polynomial data of Hardy et al (14) 


(2) Chao-Seader data 


The constants and equations for the polynomial 
equilibrium and enthalpy data of Hardy et al (14) are listed 


in Table 2 of Appendix A. 


6. bz Example Problem #2 - Absorber 


This absorber problem,described and solved by a 
short cut method by Smith (26) as Problem 8.1, and solved 


rigorously by Friday (10) has the following specifications. 
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Components (Moles) (Moles) 
CH, Zom5 ORO 
CoH, Aone: 0.0 
CH, 24.0 0.0 
nC, LiGeg Dyes Cash 
nC, 14.8 SS 
NC» 0 OZ Or 
Pressure = 60 psia 
Va = 57.8 moles 


Number of Theoretical Stages = 4 


Temperature of lean oil = 90°F 


This problem is solved using 

Bubble point procedure 

(1) NGAA data and Yen and Alexander data 
(2) Chao-Seader Data 

Sum Rates Procedure 


(1) Chao-Seader Data 
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6.1.3 Example Problem #3 - Absorber with Intercooler 


The operating data and a shortcut solution for an 
existing absorber are given by Jackson and Sherwood(22). The 
specifications as calculated from these data for Trial 1 are 


as follows: 


F ibs 
Component (1lb.moles) (lb.moles) 
H,S 3 ORY 0 
CH, + Lie 482.5 0 
CHg 45.5 0 
CH, 22670 0 
C3He Waal 0 
CH, Tele 8) 0 
CyjHe 31.4 0 
CAH Sips 0 
Ce 26.4 0 
Lo 0 846.7 
Pressure = 91.5,.psia 
Va ae 680.0 1b.moles 
No. of theoretical stages = /7 
Lean oil temperature, = 55.5°R 


Intercooler 1 on liquid stream from Plate 3 


Heat removed by Intercooler 1 = 1,465,000 BTU 
i API 26o la 
2 MW 185 


MnAvBP 495°F 
L* indicates light components such as No, H, 


grouped with CH, in analysis by Jackson and Sherwood (22) 
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This problem was attempted by Friday(10) as 
example #7 and is partially solved by Sherwood and Pigford(32). 
This problem is solved using 

a) The Bubble Point procedure with 


1) Chao-Seader data 
6.1.4 Example Problem #4 - Absorber 


The absorber of Example problem #3 was also operated 
without the intercooler to provide a comparison. The specifi- 
cations, as calculated for Trial 2 of the Jackson and Sherwood 


report(22) are: 





Components E ac 
HS 30)..0 0 
CH, + Life’ 411.6 0 
CH, 44.4 0 
CoH, 246.5 0 
C,H, 10.2 0 
: 0 
C3H, T2620 
CyHe SANS 0 
: 0 
CAH o 42.5 
22 ae 0 
Cs 
L 0 83:82 0 
O 
Pressure = 91.5 psia 
Vi = 4769* moles 
No. of Theoretical stages = 7 


O 
Lean oil temperature = 56.4 F 
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L API S652 
MW 188 
MnAvBP 500°F 
This problem is solved using 


a) The Bubble point procedure with 


1) Chao-Seader Data 
6.1.5 Example Problem #5 - Absorber with Intercooler 


The absorber problem solved by McNeese(1l) has the 


following specifications 


F Ts 
Component (moles) (moles) 
ab No 40.85 Ome 
2 CO, idk iso) 2.44 
3 HS 3.41 O7..0:0 
4 CH, eseiy 61 102.54 
> CoH, 461.42 1s .61 
6 C3H 147.73 21.03 
i ic, TERPS 0.02 
8 nC, 19.04 0.02 
9 ic. WAALS O02 
10 nC, 1.64 O.02 
11 nC, ~ 0.60 0.00 
12 nc, + (=nCg) 0.00 253,00 
Pressure = 1200 psia 
V = 2497.39 


a 
No. of theoretical stages = 6 
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Lean oil temperature = 


Bs By oe 


20°F 


Tnbencoovéerol anthiqnuadefromdpbates3 


Heat removed by intercooler = 


This problem is solved using 


236,344 BTU 


a) Bubble point procedure with 
1) Chao-Seader data 
b) Sum Rates method with 
1) Chao-Seader data 
6.1.6 Example Problem #6 - Reboiled Absorber 


This problem appears as example no. 


by Hardy et al(15). 


The specifications are 





11,in- the» paper 





Component ub Ly 
CH 80.0 0 
C, 6.60 0 
C3H, 6.66 0 
nC 6.66 0 
nC 06.0 3:0.,.0 
Pressure ='5300 psia 

Vi = 95.04méles 

SSR = 15.0émoles 

Lean oil temperature = 90°F 

No. of theoretical stages (including absorber) = 10 


Feed stage number = 6 






£ sdsig a 


Ove BPE GES Tease 


ime  Pitbes 


redroedA f soe : ane iox =t_ols 15x. Ole ) 


~~ ed i, 


| "i 
reqeq oft mi LE os afore ae seo ns a 
2 Aes: . 





a Se Be 


Maximum vapor rate above feed plate 200 moles 


Minimum vapor rate above feed plate 80 moles 


Maximum vapor rate below feed plate 100.0 moles 


10.0 moles 


Minimum vapor rate below feed plate 
This problem is solved using 
a) Bubble point procedure with 

1) NGAA and Yen and Alexander data 

2) Chao-Seader data 
It was attempted using the Sum rates method with 
a) NGAA and Yen and Alexander data 
b) Chao-Seader data but failed to converge to a 


unique solution 


Example Problem 7 - Reboiled Absorber 


The specifications for this problem were taken from a 


flow diagram for an existing gas plant design. 








Component Fo 1, API MWT MnAvBP 
Ny Oo 0 
CO, tT. 4 0 
CH, 167.4 0 
, 0 
CoHe ATA. 5 
~2 0 
CH, 440 
iC 64.3 0 
nC, Pa aes: 0 
ae Lo 5 0 
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Component Oo Oo APT MW MnAvBP 
nC, 19.4 0 
ae sled 0 
Hypothetical 1 9.0 0.5 63.2 89.6 200°F 
Hypothetical 2 5.3 2e steps 103.6 265°R 
Hypothetical 3 95.3 95.3 52.8 129.0 325°R 
Hypothetical 4 149.9 149.9 i 145.0 380°F 
Hypothetical 5 BS, 1 18.1 44.6 166.0 425°R 
Pressure...= .285 psia 
Vy = 677.0 moles 
SSR = 0.0 
Lean oil temperature = -5.0°R 
Number of theoretical stage (incl. reboiler) = 16 


Feed plate No. 6 
Qen = ¥6,000,000 BIUAURT: 
This problem is solved using 
a) Bubble Point procedure with 
1) NGAA and Yen and Alexander data 
2) Chao-Seader data (without hypothetical components) 


3) Chao-Seader data (with hypothetical components) 
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6.2 Comparison Tables for Results 


Table 1 


Example Problem 1 - Hardy et al(14) 
Absorber Bubble Point Solutions 





Hardy NGAA & YA Chao 
et al(14) Polynomial CP (3000) Seader 
Component Overhead Product (moles/u.t.) 
Cy 67.950 67.951 67.671 Gumus 
C. 12.282 12.284 123685 P2253 
C3 4.508 4.509 4.663 | 4.996 
nc, 0. s36x107_ 0.083 007 Pail 
nC, oO 660xl0n 0.000 -000 OW 
nC 4 OnLy 4 Only s .048 -406 
Plate No. Temperature Profile (CF) 
1 dish Wy es 9) Wines atte EtG 5 
2 uate Lae 61.6 120¢8 
3 ala Fay Lz 7 O72 iS 
4 1A oe De G Wide P 1203 
is) a: Oeney 1 1VOre> Sea ye de ty Sea ta) 
6 i e(@ yas) 106.1 90.7 Dee 
fi 96.4 96.8 100.9 103.4 
8 fA 74.8 TT4% 9 G56 
Plate No. Vapor Rates Profile (moles/fu.t.) 
1 85.0 85.0 85R 0 85.0 
2 89.8 89.8 99.4 9035 
3 90.5 90.5 L028 3 91le2 
4 90.7 90.8 £0332 91.5 
5 90.9 91.0 103.3 Gi 
6 Say 91.3 03-0 O22>)) 
7 91.8 Oye LO2.3 92.8 
8 93.1 9842 101.6 9443 
Calculated feed Temperature (°F) -7.0 OS 38.3 
Calculated top Product (moles/u.t.) 85.000 85.004 85.002 
g 9999 1.0008 20002 
IBM 7040 Computer time requires (min.) 0:40 0:34 B59 


No. of Iterations 34 18 16 
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Table 2 
Example Problem 1 - Hardy et al(14) 


Absorber Comparison of Sum Rates Results 





Hardy 
et al (14) Polynomial es Friday (13) 
Component Overhead Product (mole/u.t.) 
Cy 672.950 67.950 Cie LOg 
C. die 62 Ua PRS 2239 
C3 4.508 4.508 4.915 
nC, 836x107 084 209 
nc. .660x10-> .000 .000 
NC g ~174 eas ~411 
Plate No. Temperature Profile (CF) 
1 LO Teo LOSE laeiee 2 Lie 5 
2 11134 Lis ZG L255 
3 Toa TL BO d227%2 13052 
4 Tes salt Ub Bad 2 1920 32.00 
5 11032 LiGos te OL 3 a2 
6 0 Sic 10 6e3 Sala) 239%:8 
1 96.4 96,8 10338 13 Or.e3 
8 74.3 74.7 86.2 Dore 
Plate No. Vapor Flow Profile (moles/u.t.) 
. 
1 8520 8570 84.9 85.03 
2 89.8 89.48 90.5 92.00 
3 905 90.5 One, 93, 21: 
4 00s. 90.8 O15 93.53 
5 90.9 91.0 917-8 93791 
6 9Px2 9D/3 2a G4. 13 
7 SW Ags: 91/48 92.8 94.66 
8 93 el 9372 94.3 95.33 
Calculated top 
Product — 
moles/u.t. 84.996 84.999 84.94 857.03 
Feed 
Temperature ( F) -8.2 Be. op ee 
Convergence Criteria AT<,.01 Am<-, Ol 
IBM 7040 Computer Time (min.) 0:08 0:42 


No. of Iterations 7 8 8 
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Table 3 
Example Problem 2 - Smith(26) 


Absorber Comparison of Bubble Point Results 








NGAA 
Smith (26) Chao-Seader C.ea=s000 
Component Overhead Product (mole fractions) 
Ci 84725 -4746 -4788 
C, . 2260 2375 ,2468 
C3 82251 2210 #2508 
nC, .0434 0424 O22) 
nc. -0168 OL siz -0046 
Co .0162 aOelad-2 0.021: 
Plate No. Temperature Profile (CF) 
il LOse 0 dale ys) 50.9 
2 113 0 121.9 S26 
3 126.0 IPAS Ae 110.0 
4 1302.0 Lee mes Lose 
Plate No. Vapor Profile (moles/v.t.) 
il 5785 e/a 57.8 
2 Ove 74.0 98.1 
S 82.0 79.4 EZ Oo 
4 88.8 84.1 MEAL) 
Calculated Feed Temperature (°F) syepe se) 356.0 
Calculated Top Product SI PMS By oho 
6 -9996 1.0009 
IBM 7040 Computer time (min:sec) 1:11 Ois.3a7 


No. of Iterations ae 2 
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Table 4 


EXAMPLE PROBLEM 2 ~— SMITH (26) 
ABSORBER COMPARISON % SUM RATES RESULTS 


Components Smith Chao-Seader Friday (13) 
Overhead Product(mole fractions) 
Methane 92725 24744 ~ 3197 
Ethane 22200 2314 ld A hs bot) 
Propane ee Se 02209 72730 
n Butane 0434 20426 LAST] 
n Pentane 20168 AAG ahs) -0609 
n Octane POLE 2 ~0134 70225 
Plate No. Temperature Profile (CF) 
1 109.0 sabres fs) 109.6 
2 118.0 Moreh 119.4 
3 126.0 12025 12744 
4 130.0 anes oaeeG 
Plate No. Vapour Flow Profile (mole/U.T.) 
1 See 57780 53.0 
2 vASy aah 74.03 17.0 
3 82.6 79.44 83.7 
4 88.8 84.10 89.1 


Calculated Overhead 


Product (moles/U.T.) 57.80 575197 58.0 
Feed Temp. (°F) 90 29.5 90 
Convergence Criteria Dias OL 

Number of Iterations 9 ie 


IBM 7040 Computer Time 
(min. sec) O26 
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Table 5 


EXAMPLE PROBLEM 3 - JACKSON & SHERWOOD (22) 
TRIAL ob 


Comparison of Bubble Point Results 
Jackson & Sherwood (22) 
ShOreecuT Observed 
Components calc: Mole Chao-Seader Chao-Seader 


Mole Percent Absorbed 


H,S 5 Ore), 36.u/ 65m 64.4 
CH, + L 4.6 14.1 268. eal 
CoH, 17.6 2210 25291, PRK 40) 
CoH, PIES I) Bub Als 33.4 32.0.6 
C,H. 74.6 payres 84.6 eHekas! 
C3H, Ota ie Siaal, (S]e) GS Oliez 
C,H, Phe) as 100.0 000 
CyaHio POO 0 Oe 10 050 1007.0 
Ce. 100.0 100.0 PO0F0 100.0 
Absorber Oil OO 0.0 0.0 0.0 
Plate No. Temperature=Profitle (CF) 
u S645 62.4 627.0 
2 62.2 60.5 
3 47.0 Sie 
4 48.8 3979 
5 49.8 42.0 
6 LAS) 41.9 
i, 62.0 i Pl tapes 


Vapor Profile (moles/U.T.) 


4 680 680.0 680.0 
Z TiGe 759.4 
3 278.0 774.9 
4 808.2 Si2e2 
5 822.0 830.6 
6 shold: 846.9 
7 5517.0 syle 
Calculated Top Product 680 680.1 680.0 
(Moles/U.T.) 
6 1.0002 0.9993 
Intercooler load (BTU/U.T.) 1,465,000 1,000,000 1,465,000 
IBM 7040 Computer Time 
(min:sec) 16355 hele 


No. of “Iterations 351 5 
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Table 6 


EXAMPLE PROBLEM 4 - JACKSON & SHERWOOD (22) 
ABSORBER - TRIAL 2 


Comparison of Results - Bubble Point Solution 


Jackson & Sherwood (22) Chao Seader 
phew yaa Observed 
Components é 
Mole Percent Absorbed 
HS 30.1 26.3 29.66 
CH ,+L* 346 Paes 23) 8e23 
CoH, £334 Uh ie 11.06 
CoH, 21.9 13.6 Loaf 3 
C3H. 5667 ay heee £74.53 
C3He 6155 54.6 54.08 
CyHe 99.8 97.4 99.31 
CyH, 9 100.0 96041 99.63 
Cp 100.0 100.0 100.0 
Absorber Oil 0.0 OF0 0-6 
Plate No. Temperature Profile (CF) 
L Sic ee JLSaL 
2 1581 
3 71738 
4 7839 
5 81.4 
6 85.4 
7 ahsye F] 89.6 
Plate No. Vapour Flow Profile (moles/U.T.) 
? 680.0 769.0 
2 909.0 
3 939.8 
4 95322 
5 962.5 
6 974.0 
" 994.0 
Calculated Feed 
Temperature OF GB a2 
Calculated Top Product 
(moles/U.T.) 768.958 
8 0.9991 
Intercooler load (BTU/U.T.) 0 0 
IBM7040 Computer Time 
(Min:Sec) 7.17 


No. of Iterations 20 
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Table 7 
EXAMPLE PROBLEM 5 ---- McNEESE ABSORBER 


Comparison of Results for Bubble Point & 
Sum Rate Solution 


a a 


Bubble Point Sum Rates 
McNeese (11) Chao-Seader Chao-Seader 
Component Overhead Product (Moles/U.T.) 
Ny 39.39 38.48 38.48 
CO, 4,34 8.71 8.70 
HS 0.95 0.80 . 80 
Cy 2116, 67 2087.43 2087.06 
Cc, JL 28 B29 0 329.56 
C. Pav Aes 30.41 20re2 6 
ic, 0.04 06 06 
nC, 0.02 .04 -04 
ic. ipa] uaa) FOU 
nC. 0.00 +00 ; 00 
Ce 0.00 00 00 
Cot (=Co) 0.00 36 20 3.18 
Plate No. Temperature Profile (°F) 
1 leu 34.8 BM eed) 
2 Sa 2 34.1 3862 
3 29.8 32% 4 8125 
4 276 / 35.0 BAe 3 
5 29.4 34.5 33.9 
6 2785 Bie 3s 8120 
Plate No. Vapour Profile (moles/U.T.) 
st 2497.59 2497.59 2498.14 
4 2661.15 2671.45 2675.13 
3 2685.00 2702344 2708.16 
4 2719.46 2175 25.95 2750 ce 
5 2778.10 2794.02 2794.24 
6 2847.32 2873.24 28714 la 
Calculated Feed 
Temperature (OF) 24.9 24.2 
Calculated overhead 
product (mole/U.T.) 2498.83 2498.14 
Q 0025 
Intercooler load 
(BTU/U.T.) 236344 236344 
IBM7040 Computer Time 
(min:sec) 26.55 3:26 


No. of Iterations 46 15 
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Table 8 


EXAMPLE PROBLEM 6 - HARDY etal(15) REBOILED ABSORBER 


Comparison of Bubble Point Results 


Hardy etal(15) NGAA Chao-Seader 
Component Overhead Product (moles/U.T.) 
Cy 79.999 80.000 79.999 
Cy 6.655 6.665 6.665 
C. 6.267 6.565 6.400 
nC, ake ent 1.654 1.399 
NC» 0.5667 ee ae woo 
Plate No. Temperature Profile (°F) 
I 129.4 64.4 12558 
2 Pad Dieso LS Gre 
3 Ee ase 1834/6) 
4 Glee 156.9 eee Fi 
5 Lo Ge3 LOZ. Shey al 
6 268.3 259.7 26547 
“4 cee phoye! 293.9 303.4 
8 394.2 35: 1620 356.8 
9 455.5 439.4 429.2 
10 495.3 502.5 489.7 
Plate No. Vapour Profile (moles/U.T.) 
1 957.0 95 7u 95 
a4 106.8 Liv/<-6 104.0 
) L1L6<5 126.4 LOG. 
4 RE ee 6 108.9 
5 115.6 Nc hapa a Wet alte) 
6 21.4 41.4 ¥ Oa 
” 57.0 gAspetwl 49.1 
8 67.0 75408 Sprays, 
9 70.9 aah spe ager 
10 84.6 106.0 Gane 
Calculated Overhead 
Product (moles/U.T.) 94.996 94,997 950001 
Calculated Side Stream 14.996 14.994 14.997 
Reboiler Duty (BTU/ 
U.T.) 984,000 937537 893,139 
0 0.998 1.0000 1.0000 
05 0.990 1.0000 1.0003 
IBM7040 Computer Time 
(min:sec) 0:29 8:00 


No. of Iterations Ze 19 36 
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Table 9 
EXAMPLE PROBLEM 7 - REBOILED ABSORBER 


Comparison of Results for Bubble Point Solution 





Design Results NGAA 
CP=3000.0 Cr Si CAS 
Component Overhead Product (Moles) 
N> ey) Cet 
CO> 12 34 Cy T8005 eee Oa 0) 12.4 
C4 167.4 167.4 
Co 466.3 465.1 $5 5a 2 
C3 Sy eil6) Zi gh Ade y 
iCy 0.0 Or1 We 
nCy OF = aa 
tC. - = me 
nCs - - wae 
Gia “ = 
200 NBP _ C6 . i 
265 NBP - Cy = me 
325 NBP - Cg Ona h Oh aal 
380 NBP x - 
425 NBP D Cio 0.0 Orxd Le 
Plate No. Vapor and Temperature Profile 
V dhe V ik V lle V ak 
ah Th AD) ee ei Me) Sen 677.0 79.6 Gist 0 74.0 
2 ‘Aslr2 3.24 76248 903.5 89.9 880.9 o38 
3 le? deen) Si Gmez 9229 94.9 898.4 88.4 
4 In] 129280 96.9 962722 96.9 907h2 89.8 
5 Seay ee SOR ey 947.2 937.0 92 2s 35.1 
6 943926 FakO SiO 974.7 Sis. 5 944.0 76.4 
a O50 58a 2025 ae lOC LE 92.4 1006.0 86.4 
8 O-Sr20rurle2 eS Uels2 0123. 7 967618 11 U4a7 O02 
9 952768 9 13682 123055) L004 1460 93.4 
10 9572) 14a biIA614 Of12542, GiathOGs5:0 hkesi.t2 28% 
et O52. 6 eve Gee eer ce el G2) wo ceoee et) Gan 
2 054 tr k6Gmeslel 324002 enle 9. 4anel 21578 118.6 
ia! 05+) 00s) ele oro 405.4) SAAN sre 2 oe ob 
14 9 59O°cGlucks 6GraGa achGild.<8 relSO.0G2. 137%5 sOull49.4 
Le S605 Loy Ome 5905 al 78.9. WAGs ty 2oc.s 
16 2 O46. 33012 E40ic81 lS WO ere523. Ge PSs. 4 238.4 
Calculated Top Product 676.946 RA AMSG Ge EL 
Reboiler Load OU os orp O06 ag ss tO Pr: Bo 
Le 0.00 1.003 1.004 
IBM 7040 Computer Time 
(min:sec) a tee De de PA ECIEE Hs) 34:50 
No. of Iterations 28 Pas. 29 


O} 
* (Same feed composition is used as with NGAA and Y and A solution) 
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7. DISCUSSION OF RESULTS 
7.1 Comparison of Data Sources 
7.1.1 Polynomial Data 

The polynomial data of Hardy et al(14) was used to check 
the solutions of the developed - programs against reported re- 
sults. As can be seen in Tables 1 and 2, the results of Hardy 
et al are reproduced by both the bubble point and sum rates 
methods. This was not true when the reboiled absorber (Example 
6) was tried. This problem would not converge using the poly- 
nomial data possibly because the K values calculated for oc- 
tane at temperatures approaching 500°F became erratic. The 
results obtained for Example 6, using the NGAA and Yen and 
Alexander data and using Chao Seader data, indicate that the 
reboiled absorber program is functioning properly. 

7.1.2 NGAA and Yen and Alexander Data 

The results obtained for Example Problems 1 and 2 vary 
considerably from the literature values in all areas. This 
would seem to throw the reliability of the data into question. 
However, the results given for example problems 6 and 7 in- 
dicate that the data can produce reasonable results. It would 
appear, therefore, that the solution of absorbers is much 


more sensitive to the differences in data than that of the re- 


boiled absorber. 
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7.1.3 Chao and Seader Correlation 

The results of programs using the Chao and Seader 
correlation match the literature values reasonably well in 
all example problems. This agreement is perhaps best in the 
Example Problems 4 and 7 which illustrate the utility of a 
general correlation of this sort. The ability to handle com- 
ponents such as HS, No, CO5, ethylene, propylene, butene, and 
hypothetical components, such as the absorber oil,is of great 
utility in the rigorous solution of absorber and reboiled se- 
paration problems. 

7.1.4 Relative Timings 

From the computing times for the IBM 7040 given in the 
Table 1, it can be seen that the time required increases with 
the complexity of the correlation. For an equivalent number 
of iterations, the Chao-Seader correlation requires roughly 
twelve times the computing time required by the NGAA and Yen 
and Alexander data. The time taken for any solution can, of 
course, be greatly reduced by an accurate set of initial assump- 
tions. The necessity of this is particularly pointed out with 
the use of the Chao-Seader correlation. A general trend of 
predicting higher temperature profiles than the other data 
sources is shown by the Chao-Seader correlation. In most of 
the example problems this is in the order of 15°F. 

In the bubble point method, the Chao Seader correlation 


causes long computing times when the bubble point calculation 
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is not solved quickly. This is because of the lengthy calcula- 
tions necessary to calculate a value of the equilibrium ratio. 
Any means by which the speed of the bubble point calculation 
can be improved will produce a corresponding reduction in total 
computing time. 

7.1.5 Evaluation of Data Used 

a) The polynomial data, while providing a necessary 
basis for evaluating the performance of the programs and for 
comparing the example problem 1 to published results, is not a 
convenient way of providing data for the solution of absorbers 
and reboiled absorbers. 

b) The NGAA equilibrium data and Yen and Alexander 
enthalpy data required the use of constant composition enthalpy 
balances to achieve convergence with the bubble point procedure. 
The constant composition method requires the use of partial 
molal enthalpies which are not obtained reliably from the Yen 
and Alexander data. Thus, the results obtained are question- 
able and the Chao Seader data is preferable. 

Sum Rate programs for the solution of absorbers 
would not converge when used with NGAA and Yen and Alexander 
data. 

c) The Chao Seader data is the best of the three data 
sets used in that it 

1) has more utility by being able to handle a 

large range of components over a wide range 


of temperature and pressure. 
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2) does not require the use of the constant com- 
position enthalpy balances. 
3) reproduced Operating data reasonably well in 
the one case available for comparison. 

d) The data used has a very great bearing on the re- 
sults obtained. This is borne out by the difference in results 
obtained for Problem No. 1. The statement made by Friday(10) 
that the sum rates method is more accurate than the bubble point 
method is not borne out by the results obtained for Problem No. 


1. His results are different because he used different data. 


7.2 Comparison of Methods 
7.2.1 ‘The Bubble Point Method 

Ae Very Cursory,examinaclon Of tne times required for 
the solution of an absorber or reboiled absorber problem by 
the bubble method reveals that this method can be very expen- 
Suavemln terms Of Computing time. “Attempts were made to reduce 
this time, particularly in the case of the bubble point pro- 
cedure used in conjunction with the Chao-Seader data source. 

A forcing technique in the form of a weighting factor 
for the temperature correction between iterations is neces- 
sary because of the over correction associated with the bubble 
point method. In problem 3, convergence was achieved using a 


weighting factor of 0.25 where 
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This convergence occurred after 47 iterations with a computing 
time of 17 minutes. A weighting factor of 0.1 was used with 
the same problem and convergence was not attained in 49 itera- 
tions with a computing time of 27 minutes. In the first case, 
there was no iteration past the 28th which required more than 
thirty trials to solve the bubble point on any stage, whereas, 
in the second case there were stages on which the bubble point 
calculation took-more than thirty trials even in the last re- 
corded iteration. This illustrates one way in which the bubble 
point calculation can be improved. 

A 'stepped' weighting factor was used in one case in 


the following fashion 





Wt. Iteration No. 
0.1 0 - 10 

0.2 10 - 20 

0.4 20 - 30 

0.8 30 - 


The program did not converge as the weighting factor of Gi59 
was too severe. The use of the stepped weighting factor as 
shown above with the modification of using wt at 0.4 for all 
iterations after the twentieth did not produce any appreciable 
decrease in computing time for the problem attempted. 

A convergence criteria involving the specification of 
the temperature change that can be allowed between two suc- 
cessive iterations before a solution can be assumed is re- 


quired for the bubble point procedure. This is in addition 
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to the convergence criteria involving the top product, side 
product and @. Table 10 shows the difference in results ob- 
tained for Example peasren 4 with the bubble point procedure 
using and not using the temperature change specification. 
While the percentages absorbed agree well, the vapor rates 
disagree by up to 15% in the center of the column. This makes 
the results obtained without the temperature restriction of 
limited use. However, the relative times required for solu- 
tion may make this method attractive for some cases. The de- 
cision of which to use would depend on the economics of the 
Situation. A comparison was made of the times required to 
reach a bubble point solution (polynomial data) for Example 
Problem 1, using different values of the temperature weight- 
ing factor, tolerance, product tolerance and bubble point tol- 
erance. These appear in Table 11. With the introduction of 
a temperature change restriction, the tolerance on the bubble 
point calculation must be of a smaller magnitude than the 
tolerance allowed on the temperature change 
7.2.2 Sum Rates’ Method 

The computing times. required for the solution of Prob- 
lems 1, 2 and 5 by the sum rates method are quite low when 
compared to those required by the bubble point procedure. In 
Example 1, in particular, they are roughly one ninth of that 
required for the bubble point procedure using the Chao Seader 
data. Agreed, if the top product specification is to be 


satisfied, a series of trials at different feed temperatures 
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Table 10 


Comparison of Results for Example Problem 4 


With and Without AT Specification 


W = with specification of Linea - T,[<0.1 
W/O = without AT specification 
Percentage Absorbed 
Component W W/O 
H,S 2926 S07 
CH, + L* B52 BE 2 
CoH, a 1 Ba 
CoH, ae Lone), 
C3He A 5 47.6 
CH, 54.0 5869 
C3H, Sh) 3) ehaa 
C,H, o IAS EES 
Ce HOI0z.0 L000 
Temperature (CF) Vapor Rates (moles/u.t.) 
Plate No. W W/O We W/O 
ii ees) (fees 16 9r 0 T6944) 
2 eee B1e5 90 a5 SHS ye Ga 7 
3 ibe 8229 O37 7% 1 Over 
4 as) 83.0 952.9 1098.6 
5 81.4 Bot2 962-6 1084.8 
6 85.4 84.2 2MES ee 1060.6 
zt ely) biG O93 io 1042.6 
Maximum IBM 7040 
No. of Iterations |T,. te Computing Time 
for Solution {br) (min:sec) 
W 50 Om LS 23 


w/o 6 10.3 3:1 
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Comparison of Computing Times for 
Example Problem #1 
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must be carried out. This was done for Example 2. The results 
of the three trials that were necessary are included as Annex 
12 to Appendix F. The time required by three trials of the 

sum rates and by the bubble point procedure to reach the same 
result were the same. 

The results obtained by sum rates solution of Example 
1 using the polynomial data of Hardy et al(14) exactly repro- 
ducesthe, bubbles point wesults, of) Handy, et al(14).. .This, points 
out that both methods converge to the unique solution using 
the convergence criteria presented. This is contrary to the 
observation of Friday(10) who felt that the bubble point method 
of Hardy et al(14) did not reach an accurate solution. 

The sum rates method was found to fail to converge when 
the specification of top product was used instead of the speci- 
fication of the feed temperature. An attempt to include the 
convergence technique in the sum rates method caused the 6 
method to fail to converge as well. 

In the solution of Example Problem 2, an attempt was 
made to utilize the control of Viegy a Vi, as suggested by 
McNeese(1l). In this suggestion to aid convergence, the vapor 
rate change between iterations must be less than a specified 
tolerance before the temperature profile is adjusted. [In other 
words, there is a minor iteration to force the vapor profile into 
convergence within the major temperature iteration loop. This 
restriction caused a three-fold increase in the computing 


time required for the problem and did not cause 
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any change in the solution. From this experience, it appears 
that the complete iteration for all variables is best left 
without any interference such as 6 forcing,vapor rate itera- 
tions or different specifications, 

The programs applying the sum rates method to the re- 
boiled absorbers of Problems 6 and 7‘ have failed to converge 
to a unique solution. The temperature profiles obtained from 
successive iterations vary considerably and cause oscillation 
in the vapor and liquid profiles. Further work on methods of 
forcing convergence is required in this area. 

7.2.3 HVYatvation 

The sum rates method is the superior method for solu- 
tion of absorbers in that it 

a) requires considerably less time than the bubble 
point method to achieve a solution. 

b) can accommodate a change in the location and 
number of feeds and side stream without repro- 
gramming. 

The bubble point method, which works for the reboiled 

absorber whereas the sum rate does not, is very time consuming, 


especially when used with Chao Seader data. 


7.3 Convergence 


As concluded by Napthali(34) there is no criteria by 


which convergence can be guaranteed for a large system of non- 
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linear algebraic equations, such as exist for the absorber 

or reboiled absorber. As illustrated in this work, a change 

in data can cause non-convergence. For the problems solved 

on this work the following forcing techniques were used. 

a) Bubble Point Meron 

1) Temperature weighting factor 

2) Theta convergence technique 

3) constant composition enthalpy balances (with 

the Yen and Alexander data) 
4) Restriction of all equilibrium ratios calculated 
by the Chao Seader correlation so that 
K > .00001 in all cases. 
This was only found necessary in problem No. 3 
where the absorber oil reduced temperature went 
out of correlation limits. 

b) Sum Rates Method 

- No forcing techniques were required for the 
absorber solution. 

- Attempts to use temperature weighting factors and 
vapor and liquid profile weighting factors to restrict the 
change from iteration to iteration did not produce convergence 
in the case of the reboiled absorber. 

c) It was necessary to program a call for the subroutine in 
the computer system which prevents the program from being 
stopped because of numbers exceeding the limits of the 
computer. These limits were exceeded when the ratios (b/d) 


and (b/d) down were calculated for Problem 7. 
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8. RECOMMENDATIONS FOR FUTURE WORK 


Future work should be directed towards 
The evaluation of a matrix solution of the material 
balance equation such as suggested by Wang and Henke (33) 
coupled with the sum rates method of solution for a new 
temperature profile. 
Comparing the speed by which bubble point calculations can 
be completed for the reboiled absorber using the method 
selected by Wang and Henke(33) and a conventional method. 
An increase in speed would be most advantageous in the case 
of the use of the Chao Seader correlation. 
The development of an algorithm for use with a specific 
general correlation which will guarantee convergence for 


all types of separation problems. 
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DEFINITION OF SYMBOLS 


A constant in various expressions 

AA dummy variable 

AF absorption factor 

AH enthalpy correlation constant 

AK dummy variable 

B constant in various equations 

BB dummy variable 

BH enthalpy correlation constant 

BP boiling point 

b moles of a component in the bottom product 

cl composite variable described in equation 3-7d 

CH constant in enthalpy correlation 

CJ dummy variable 

d moles of a component in the top product 
density 

DH enthalpy correlation constant 

E enthalpy imbalance in BTU 

rs moles of a component in the feed stream 

FV moles of vapor in feed 

FL moles of liquid in feed 

FEH feed enthalpy 

h liquid enthalpy 


dummy variable in the Redlich Kwong equation of state 


H vapor enthalpy 
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HY feed vapor enthalpy 

HX feed liquid enthalpy 

K equilibrium ratio (y/x) for a component 

i moles of a component in a liquid stream 

L total moles of liquid in a stream 

MW molecular weight 

P pressure in psia 

Q heat quantity using the convention that heat removed 


from the column is positive 


Spadn. ~Specificrgravity 


S stripping factor 

SSR specified liquid side stream product rate 
Ae Eemperature 

Vv moles of component in a vapor stream 

Vv total moles in a vapor stream 

V1 specific volume 

Ww moles of a component in a side stream 

W1 calculated liquid side stream rate 

x liguid mole fraction of a component 

y vapor mole fraction of a component 

Z compressibility factor 

Z total mole fraction of a component in the feed 


ZT dummy variable 
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Subscripts 
top at the top of,.thescolumn 
bot at the bottom of the column 
down direction of. calculation 
Ss Criticalgproperty 
ca cubic average 
i component number 
5 plate index 
ma mean average 
mla molal average 
n plate index 
NCP total number of components 
NN bottom plate of the absorber 
plate above the reboiler in the reboiled absorber 
NF1 feed plate number 
NQ1 plate number of intercooler/interheater number 1. 
NQ2 plate number of intercooler/interheater number 2. 
NT reboiler plate number 
MNF 1 plate above the feed plate in the reboiled absorber 
F feed stream 


Greek Symbols 


U f/p ratios for the liquid phase 

Y liguid phase activity coefficient 
o vapor phase fugacity coefficient 
6 solubility parameter 

) convergence forcing factor 


W aceentric factor 
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APPENDIX A 


DATA 


Table l 


Enthalpy Constants for Ideal Gas State 


Enthalpy as Determined from Rossini(30) Data 














Component AH (1) BH (1) GH (i) DH (1) 
CO, 2162018 5042.34 4279.62 -861.623 
Ny 2526019 6858.14 2637635 63.2574 
CH, 124.452 7S5SLOGT -611.562 LOL9¢76 
CH, 489.085 4829.65 Gy 22516 685.048 
CH, 125.280 3014.23 14039.0 -540.905 
iC, 615.743 Ole 5 2 Onde: 1278.07 
nC, 1A 7687 4685.36 17976x%8 ae ee ee, 
iC, Abies ee 2108.48 26463.0 -2502.20 
nC. Oo 6. OL DOD aac Z25a2.6 =959, 097 
nC¢ 3 ESS al -3165.45 40300.0 -7372.64 
nC. apa wigs 7 beans: HUAS 72a Beall) PHO Si. 3 4660.20 
nC, 3704.27 -3478.07 ee ely hdl —-9206.77 
NC 4230.74 -4668.71 HICLAL S -10965.4 
nC 9 4554.53 -4964.19 66016.9 = 2 0b G 
where 
dk ft 2 AE 3 
SHAH. + BH. (- JO+ CH: { ) DH, ( : 
1000 1000 1000 


(f) Ha 


eS. L38- 
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oT .efel 
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Feo. e2e- 
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Table 2 


Equilibrium and Enthalpy Constants from Hardy et al(14) 





Component ay as a, ay 
CH, 32 ere 39 - 9.6951405 6.9229334 \— 4725361298 
CoHe - 9.8400210 67.545943 -37.459290 - 9.0732459 
C3 -14.512474 53.638924 - 5.3051604 -173.58329 
Cy -14.181715 36°. 8603534 PO ZL a2 -248.23843 
Ce - 7.543539 2.058423.) 59 .138344 -413.12409 
Coy PerrTlaaoo: =52. 608530 rO3.72034 -496.46551 
173, oe 2 3 Wie 
(K,/T) = 813 + a5,T + a,.T + a,,T (Tee) 
Component AH. Siete, obsoh NaO) CHa x 10> 
1 ai a 
CH, -17.899210 UR eee hog Mays) - 3.7596114 
CoHe - 8.4857000 1.6286636 - 1.9498601 
C3 -14.500060 1 93.02225 - 2.9048837 
nC, -20.298110 2.3005743 - 3.8663417 
nC. -24.371540 2.5636200 - 4,6499694 
NC. -22.235050 2.8478429 - 3.8850819 
1 
th.) 0.20? Got. + CH. T? (Tt = ©R) 
uh uP 1 al 
4 6 
Component DH. EH. x’ 10 PHo x LO 
+t 1 ab 
CH, 44.445874 501.04559 ise Ose duo 
CoHe OL. 384520 588.75430 11.948654 
C3 Bee 9 59 20 B69 20 Long 36.470900 
nC, 152.66798 --1153.4842 146.64125 
nC, TZ28.90252 - 2.0509603 64.501496 
nC. 067.3280 6 1328.3949 162307371 
2 Oo 


e 
(HL )— = DH, + EH ,T + FH ,T (T = ~R) 
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APPENDIX A 


pO MUTABLE. 3 








CHAO SEADER CONSTANTS FOR THE 
CALCULATION OF LIQUID FUGACITY COEFFICIENTS 


At 1) 
A( 2) 
A( 3) 
A( 4) 
A( 5) 
A( 6) 
A( 7) 
A( 8) 
At 9) 
A(10) 
A(11) 
A(12) 
A(13) 
A( 14) 
A(15) 
A( 16) 
Atal) 
A( 2) 
A (3 ) 
At 4) 
A( 5) 
Al 6) 
ap 
AEG) 
A(. 9) 
A(10) 
A( 11) 
A( 12) 
A(13) 
A(14) 
A(15) 
A(16) 





GENERAL 
O.57574800E Ol 
mien Le Ol 
-0.49850000E O01 
Peeves IOOE (Ol 
O. 





METHANE 
0e24384000E Ol 
“0. 22455000E O01 
-0.34064000E O00 
0.21200000E-02 


HYDROGEN 
O-19671800E Ol 
0.10297200E Ol 

-0.54008999E-01 
0-52880000E-03 
O. 





0-84270000E-O1L 


0.26667000E OO 


O0.10486000E 00> 


-0.36910000E-01 


0.85849999E-02 
O. 





--0.31138000E 00 0. On 
-~0.26550000E-01 0. a 
0.28830000F-O1 0. Os 
—0.42389300E 01 0. 0. 
0.86580800E Ol Os 0. 
-0.12206000E Ol 0. Or 
—0231522400E O01 Os hr 
-0.25000000E-01 ihe Os 
0. On Os 





NITROGEN 
Oc 54 aU © 
SOV eNe aE sew hele: 19) 
Used L4G 1 2hIb 200 


COZ 
—-0.30060874E 02 
0.61409853E Ol 
Ost oe Osecven Ue 


H2S 
0.30581210E Ol 

-0.26491906E Ol 
0.37457945E 00 





0.424/70988E-01 
-0.28143800E-02 
Oe 2 oe 4 i OOE=O1 

0.21495843E-0O1 

Cae 

O. 

OQ. 

Os 

O. 

O. 

O. 

O- 

O. 


—0.27303012E 02 
0.59152545E Ol 
0.36633843LE 00 

—O.6791681LLE 00 
0.15546365E 00 
Oe 





0-89562849E-01 
Oe 
Oe 
QO. 
QO. 
QO. 
Oe 


-0.14647096E Ol 
0-45734766E O00 
SOs Jot clots emo 
0.-14272648E Ol 
~OsoUZ42e 506800 
0-33859029E O00 





-0.26678483E 00 
Oe 

O- 

Oe 

O. 

O. 

O«. 
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APPENDIX A 


TABLE 4 








COMPONENT PHYSICAL PROPERTIES 
FOR CHAO SEADER CORRELATION 























mec UMPONENTS . pl Camemeertere PG. _W OETA V1 
H2S ieee 1306.5 0.0868 8.800 43.1 
NITROGEN e261 492.3 0.0206 42440 53.0 
cn? 547.56 UG tees 0.1768 FA hea) 44.0 
_ METHANE 343.90 673.1 4 0.0000 5-680 520 
ETHYLENE 509.50 Teo etl. 0.0949 6.080 61.0 
ETHANE 550.50 709.8 0.1064 6.050 68.0 
PROPYLENE 651 e220 667.0 Oe L451 6.430 79.0 
PROPANE 665.90 Elite 4 0.1538 6.400 84.0 
1 BUTENE 755.30 583.0 0.2085 6.760 95.3 
I-BUTANE 734.70 579. eee oe 6.730 LOSs 5 
N-BUTANE 765.30 550.7 0.1953 6.730 LO 
I-PENTANE 829.80 483.0 0.2104 fark owas) bure4 
N-PENTANE 845.260 489.5 0.2387 penal itor sil 
N-HEXANE Tigeco 440.0 typhi: 72266 131.6 
N-HEPTANE 972.30 396.8 0.3403 7 «430 147.5 
“N-OCTANE 1024.90 3 be wl Oe 9  aeeey! 163.5 
N-NUNANE 1073.00 332.0 0.4439 7.649 179.6 
N-DECANE Dae Od 304.0 0.4869 Teenie: 196.0 
TABLE 5 








CHAO SEADER ENTHALPY CONSTANTS 


COMPONENTS AH BH CH DH 








Hes _ 0.3659210E 04 048033766E Ol 0-6508904E-03  043250902E-06 
NITROGEN 0.3192124E 04 0.6956438E 01 -0.3103818E-04 0.2350028E-06 
CG2 0.3357740E 04 0.8440110E O01 0.3040541E-02 -0.7897689E-06 
METHANE 0.3683894E 04 0.7880800E 01 0.3505719E-02 0.2446472E-06 
ETHYLENE 0.3791992E 04 0.9144806E O01 0.7819394E-02 -0.1522679E-05 
ETHANE 0.4220126E 04. 0.1120242E 02° 0.8938123E-02 -0.8066164E-06 


_ PROPYLENE 044714762 04 0.1350214E 01 0-1146875E-O1 -0.1797251E-05 


PROPANE 0.5068633E 04 O.1510799E 02 0.1540639E-01 -0.2938696E-05 
L BUTENE 0.5934714E 04 0.1768871E O01 0.1763632E-01 -0.3901157E-05 
I-BUTANE 0.6023067E 04 04.1999786E 02 0.2044134E-01 -0.4146112E-05 | 
N-BUTANE 0.6654675E 04 0462054464E 02 0.1865250E-01 -0.3016783E-05 
I—=PENTANE 0.7475643E 04 0.2465428E 02 022446248E-01 -0.4437345E-05 
N—-PENTANE 0.8039759E 04 0.2518989E 02 0.2348587E-O1 -0.4174458E-05 
N-HEXANE  0.9475028E 04 0.2952267E O02 0-2914070E-O1 -0.5911897E-05 
N-HEPTANE 0.1056589E 05 0.3331526E 02 0.3278746E-01 -0.6696126E-05 
N-OC TANE 0.1226219E 05 063899065E 02 0-3841118E-01 -0.7945704E-05 . 
N-NUNANE 021366069E 05 0.4373618E O02 0.4301726E-01 -0.8954763E-095 
N-Dt CANE 0.1505435E 05 0.4848591E 02 0.4756158E-O1 -0.9858597E-05 


AE LT TTT TS LET NE TN TT TTT TY Tet SAT 
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APPENDIX. 7B 


PROGRAMS 





a xiquaqga. .. 2 
aMAADORS 


Cee 


COUR Gl Gn2. Cre 


APPENDIX B ANNX 


THIS PROGRAM SOLVES ABSORBERS BY THE BUUBLE POINT PROCEDURE 
USING EITHER TRE CHAO AND SEADER DATA CORRELATION OR THE 
NGAA AND YEN AND ALEXANDER DATA COMBINATION 


REAL LO,LOI,LOD1,LOR,yLN,»,»LNN,L,LB,LOX 

COMMON NCyNKCyNCP_,P,FReFLeFV_,XF(15) ,YF(15),ZF(15),ENTH 
COMMON XM(15)5YM(15),Z2M(15),L0(15),X(15,35) >¥(15435) 
COMMON XT(15,35),YT(15,35) ,BBMIX( 35) ,AAD0B(35),20(35) 
COMMON AH(15),BH(15),CH(15),DH(15),EH(15),FH(15) 
COMMON JH2,JC1,JN2,J02, JCO,JCO2 9 JHZ2S ,DDELMX(35) »KDATA 
COMMON TC(15),PC(15),W(15),DELTA(15) »VL(15) »,A(1656) 
COMMON EQ(15) 

CUMMON PH(15) 

DIMENSION F(15),T{30),T1I(30) »L(30),V(30) »AF (30) »S(30) 
DIMENSION ER(15,35),0(30),LO0X(15),BCO(15) ,CPNT (15,2) 
DIMENSION VO(15,30),LB(15,30),80(15),TOP(15),B0T(1i5) 
DIMENSION DCO(15) 


INPUT/QUTPUT FORMAT STATEMENTS 


100 FURMAT(2513) 

101 FORMAT(8F10.8) 

102 FORMAT(1OF8.0) 

103 FORMAT (1Xs2FT7.1,F7.49F6.39F742533X%_2A6) 

104 FORMAT (1X,4E14.7) 

105 FORMAT (3F10.8,38Xy2A6) 

LLO0 FORMAT(LHL/1LHK,40X,12HPROBLEM NO. 12) 

LLL FORMAT(40X,17HPROBLEM STATEMENT) 

112 FURMAT (1HK,43X,8HABSORBER) 

LL3 FORMAT( LHL» 1L?7X,1L5HA. COLUMN DATA) 

114 FORMAT (1HJy27X,15HPRESSURE (PSTIA),1LOX, 
LI6HNUMBER OF PLATES) 

L116 FORMAT (LHK,19X,2LHINTER HEATER GON PLATE, 13, 
114H WITH DUTY OF,F10.0,9H BIU/U.T.) 

LL7 FORMAT(LHJ, 31X,F7.1,922Xy12) 

118 FORMAT(LHK,19X,21HINTER COOLER ON PLATE ,I3, 
L14H WITH DUTY OF,F10.0,9H BTU/U.T.) 

119 FORMAT(1HL»17X913HB. FEED DATA) 

120 FORMAT(LHJ,37X,1LOHTEMPERATURE (DEG F)»8Xy9HCONDITION) 

121 FORMAT(20X»4HFEED,17X_,1L3HNOT SPECIFIED ,8Xy 
LLGHSATURATED VAPOUR) 

125 FORMAT(20Xy1L2HABSORBER OIL y12XeF6e1911X» 
LL7HSUB-COOLED LIQUID) 

126 FORMAT(1LHK,41X,4HFEED, 16X,1L2HABSORBER OIL) 

127 FORMAT (21X,1LOHCOMPONENTS,4X_y8HLB MOLES s5Xy4HMOLE» 7X, 
18HLB MOLES»5X»y4HMOLE) 

128 FORMAT(35X»y8HPER UseTes3Xe 8HFRACTION, 5Xy8HPER UsToe3Xy 
L8HFRACTION) 


1 XVWMA & XIGUS9SSA 



























* aay 

39Ud39089 THIO9 348UUS FHT YS 2ARagRD2HA 23avIDe 4ana089 aw 3 7s 
4HT 80 VOITAJFAAOD ATAG AIGAR? GUA OAHD JHT ABHTIZ a ay 
“VOlTAVIAMOD ATAG ABQUA XII QUA W3Y ama ee 

KOS Gide Jey Wde AD Jy £0045 203009 Jaan 2 
HTM 3 e (SLI ANe COLD AV  LELD AN VA a SFO AFIT 2 IOV ee IHAe DW VOMMOD 

(26 21% e (EE eSLIKe (ALO e (SLIMN eg CAL IMY« (21 MX WOMMOD 
(@EV IN e (CEP AGAR, (AE DXIMBG, (SE peL ITY (2G AL) TX WOMMOD 
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129 FORMAT (20X_2A649 2X9 F903 9 3X a F lao 4 a DXF 90 39 SXF TOS) 

130 FORMAT(1HK,19X,28HSPECIFIED TOP PRODUCT RATE =,F10.3, 
LL4H LB MOLES/U.T.) 

132 FORMAT(LHL,17X,17HC. ENTHALPY DATA) 

133 FORMAT(1LHJ,19Xy28HCHAD—-SEADER CORRELATION USED) 

134 FORMAT(LHJ,19X,34HYEN AND ALEXANDER CORRELATION USED) 

135 FORMAT(LHK,32X,32HZERO PRESSURE ENTHALPY CONSTANTS) 

136 FORMAT (21X_, LOHCOMPONENTS» LOX 92HAHs9X_2HBH29Xe2HCHs9Xy 
12HDH) 

137 FORMAT (20X_y246,2X,4E11.4) 

138 FORMAT(LHL,17X,26HD. EQUILIBRIUM RATIO DATA) 

139 FORMAT(1H1) 

140 FORMAT(1LHJ+19X,35HNGAA POLYNOMIAL DATA AT CONVERGENCE, 
LLLH PRESSURE =,F7.095H PSIA) 

141 FORMAT(LHJ,20X, LOHCOMPONENTS 6X, 2HTC,8Xy2HPC,8X,1HW, 
L7X,5HDELTA, 3X, 2HV1) 

142 FORMAT(20Xs2A692XyFlely3XeFlely3XaFle4a3X9F6.3yF 8.2) 

143 FORMAT(LHL,17X,23HE. INITIAL ASSUMPTIONS) 

144 FORMAT(1HJ,39X%,15HPLATE VARIABLES) 

145 FORMAT (20X,9HPLATE NO«ws5Xe1lLLHTEMPERATURE 3 5X 
LLLHVAPOUR RATE,5X,1LLHLIQUID RATE) 

146 FORMAT(36X,7H(DEG F),8Xy,LOH(LB MOLES) ,7X,1LOH(LB MOLES) ) 

147 FURMAT(51X,1l0H(PER U.T.)»y/X,yLOH(PER U.T.)) 

148 FORMAT (23X,12,10X9Fle2y 9X oF bole 8X F822) 

149 FORMAT ( LHK,y39XyL5SHPRODUCT STREAMS) 

150 FORMAT (1LHJ,39X_y 7HDRY GAS,1L6X,8HRICH OIL) 

151 FORMAT (21X,LOHCOMPONENTS,7X,10H(LB MOLES) ,14X, 
LLOH(LB MOLES)) 

152 FORMAT(38Xy,1LOH(PER U.T.~)914XyLOH(PER U.T.)) 

153 FORMAT (20X52A6,6XyF10.3914X,F 1023) 

154 FORMAT(LHJ,19X,11HTOTAL RATES, 7X,F10.3,14X,F10.3) 

155 FORMAT(1HJ,19X, L6HITERATION NUMBER» 14) 

157 FORMAT(1LHJ,19X_y7HTHETA =yF9.6) 

163 FORMAT(LHJ,19Xs29HTHETA CONVERGENCE TOLERANCE =,F9.4) 

164 FORMAT(1HJ,19X,38HPRODUCT STREAM CONVERGENCE TOLERANCE =, 
1F9.4) 

165 FORMAT(1HJ,19X,30HTEMPERATURE WEIGHTING FACTOR =,F6.3) 

168 FORMAT(LHL,»19Xy22HNUMBER OF ITERATIONS =914) 

169 FORMAT(1HJ,19X,29HCALCULATED FEED TEMPERATURE =,F6.1) 


READ IN PROBLEM DATA 


ITER=0 

READ(5,100) NC,yNHCeNNyNQL2NQ2yKDATAsNOPROB 

NT=NN+1 

NCP=NC4+NHC 

READ(5,101) P,yTLOsDS,Q1,02,PCONV 
READ(5,LOLIC(T(N) »N=1lyNN) 
READ(5,101)(L(N),N=19NN) 
READ(S,1LOL)( VIN)» N=lo NN) 

READ(5,101) VMAX1,VMIN1,THV,VVyWT 
IF{KDATA.EQ.1) GO TO 20 
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READ(5,100) JH2,JC1,JN2,J02,JC0O,JCO2,JH2S 

READ(5,1lO1L) ((A(T,J),1=1,16),J=1,6) 

DC 26 I=1,NC 

READ(5,103) TC(1I),PC(I) »W(I) »,DELTA(I),VL(1),(CPNT(I,J) 
LyJ=1,2) 

READ(5,101) ZM(1I),LO(I) 


26 READ(5,104) AH(1),BH(1),CH(I),DH(1) 


IF(NCP.LE-NC) GO TO 27 
CALL PHYS(CPNT) 
GQ;Tei27 


20 DO 19 I=1l,NCP 


READ(5,105) ZC(I),TC(I) »PC(T),(CPNT(1 J), J=1ly2) 
REAC(5,101) ZM(1),LO(T) 


19 READ(5,101) AH(IT),BH(I),CH(IT),DH(I),EH(I),FHCI) 


LF CKBATA-EQ.2) GO TO 27 
CALL PHYS(CPNT) 


27 MNN=NN-1 


CALCULATE MOLE FRACTIONS IN FEED STREAMS 


23 


16 


FR=0. 

LOR=0. 

DO 23 [=1,NCP 
F(I)=ZM(T) 
FR=FR+F(1) 
LOR=LOR+LO( 1) 
V(1)=DS 
L(NN)=LOR+FR-DS 
DCO 16 I[=1,NCP 
J=NT+2 
ZF(I)=F(1I)/FR 
XT(1,J)=ZF(1) 
LOX(1)=LO(1)/LOR 
J=NT+1 
XT(I,J)=LOX(T) 


PRINT OUT PROBLEM STATEMENT 


63 
66 


WRITE(6,110) NOPROB 
WRITE( 6,111) 
WRITE(6,112) 

WRITE (65113) 
WRITE(6,114) 
WRITE(6,117) PyNN 
IF(NQ1L.GT.NN) GO TO 66 
IF (QL.LT.0.2), GO TO 63 
WRITE(6,118) NQ1,Q1 

GO TO 66 

WRITE(6,116) NO1,Q1 
IF(NQ2.GT.NN) GO TO 62 
IF(Q2.LT.0-) GO TO 65 
WRITE(6,118) NQ2,Q2 
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GC TO 62 

65 WRITE(6,116) NQ2,Q2 

62 WRITE(6,163) THY 
WRITE(6,164) VV 
WRITE(63165) WT 
WRITE(6,119) 
WRITE(6,120) 
WRITE(6,121) 
WRITE(6,125) TLO 
WRITE(65126) 
WRITE(6,127) 
WRITE(6,128) 

DO 69 I=1l,NCP 
WRITE(6,129)(CPNT(1,J),J=1,2),Z2M(1),ZF(1),LO(I),LOX(T) 

69 CONTINUE 
WRITE(6,130) DS 
WRITE(69139) 
WRITE(6,132) 
IF(KDATA.EQ.1) GO TO 67 
WRITE(6,133) 

GC TO 68 

67 WRITE(6,134) 

68 WRITE(6,138) 
IF(KDATA.EQ.1) GO TO 73 
WRITE(6,133) 

GO TO 74 

73 WRITE(6,140) PCONV 

74 WRITE(6,143) 
WRITE(69144) 
WRITE(6,145) 

WRITE( 6,146) 
WRITE(6,147) 
DC 72 N=1,NN 
WRITE(6,148)NyT(N) VIN) LIN) 

72 CONTINUE 

WRITE( 6,139) 


BEGIN SOLUTION OF PROBLEM 


50 ITER=ITER+1 
WRITE(6¥155) ITER 
BOTS=0. 

TOPS=0. 

KENTH=5 

CC 30 N=1_,NN 
IF(KDATA.~EQ.1) GO TO 14 
IF(ITER.LT.2) GO TO 28 
DO 32 I=1,NCP 
XT(ITysN)=X( TN) 

32 YT(TsN)=Y(I9N) 

14 CALL K(T(N),KENTHsN) 
GG TO 31 
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CALL KIDL(T(N)) 

DO 30 I=1,NCP 
ER(ITyNJ=EQ(T) 

DC 2 I=1,NCP 

DC 25 N=1,NN 
AF(N)=LIN)/(ER( TN) #V(N)) 
S(N)=1./AF(N) 

LCI=LO(1) 

FI=F(1) 


CALCULATE B/D RATICS DOWN THE COLUMN 


AA=AF(1) 

BB=1l. 

CC 1 N=3,NT 

AFI=AF{N-1) 

AA=AA* AFI 

BB=BB#AFI+1. 

BOCCWN=(AA#LOIT+FI#( AA+BB-1.))/(FI+BB#LOI ) 
DCOWN=(LOI+FI)/(1.+BCDQWN) 
BCOWN=BODOWN#CDOWN 


CALCULATE B/D RATIOS UP THE COLUMN 


Zo 


AA=l1. 

BB=C. 

DC 29 N=1,NN 
J=NN41—N 

SFH=S(J) 

AA=AA*SF 

BB=BB#SFt+l. 
ZT=LOI+FI 
AK=LOI+8B#FI 
BDUP=AK/((AA+BB) #ZT—AK ) 
BUP=ZT/(1.2+1.0/BDUP) 
DUP=BUP/BDUP 


CALCULATE V/D FOR EACH PLATE 


3 


LOD1=1.-LOI/0DQWN 

VO(I,1l)=1. 

DO 3 N=2,NN 
VO(I»N)=AF(N-1)#VD(1,N-1L)+LO0D1 


CALCULATE L/B FOR EACH PLATE 


FlB=1.-FI/BUP 

LB(I,NN)=1. 

DC 4 N=1l,MNN 

J=1+NN-N 
LB(I,J-LJ=LB( I,J) #*S(J)+F18 
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CALCULATE ROUND-OFF ERROR RATIOS 


BCUTOP=1L./{(LB(1I,1)*#S(1)) 
BOBOT=VD(I,NN)#AF(NN) 
RTOP=BOTCP/BDUP 
RBOT=BCBCT/BDDOWN 

IF (ABS(RTOP-1.0).LE.~ABS(RBOT-1.0)) GO TO 5 
BO(1)=BDDOWN 

TOP (1)=DDOQWN 

BOT(1)=BDOWN 

DO 7 N=1,NN 
LB(I,N)=VD(IyN)#AF(N)/BD(1) 
GO TO 24 

BO(IT)=BOuUP 

TOP(1I)=CupP 

BOT(1I)=BupP 

DO 6 N=1,NN 
VO(IT»N)=LB(IyN)*S(N)#BO(T) 
TGPS=TOPS+TOP(1) 
BOTS=BOTS+BOT(1) 

CONTINUE 


CHECK CONVERGENCE CRITERIA 


33 


ZEUAESETOPS-DS).GT.VV) GO TO 35 

IF (CABS (TH-1.0).-GT.eTHV) GO TO 35 

DQ 33 N=1,NN 
IFCABS(TI(N)-T(N)).GT.0.1) GO TO 35 
CONTINUE 

GC TO 51 


THETA CONVERGENCE PROCEDURE 


Be 
9 


TH=0.9 

G1l=0. 

DCOSM=0. 

DG 8 T=1l,NCP 
DCO(I)=(F(T)+L 001) )/(1.+TH*BD(T)) 
BCO(1)=TH#BOD(1)*DCO(1) 
Gl=G1+(BO(1)#( F(T) +LO(1)))/0(1.+TH*BD(1)) ##2) 
DCOSM=DCOSM+DCO(T) 

G=DCOSM-DS 

IF(ABS(G).LT. THV) GO TO 10 
THN=TH+G/G1 

IF(THN.LT.O.) THN=TH/2. 

TR=THN 

GO TO 9 


CALCULATE NEW MOLE FRACTIONS ON EACK PLATE 


10 


DC 11 N=1,NN 
SV=0. 


i, oe _ ® 
h o ra a : 


5 en aoe ¥ rl 
201TAS Fee soda 


Sey ae 

(denear Nats 

(NA DABS (Ag 7 

~ | QUOR 

i wpe te, “wOGGaN 

@ oT Oa | 10.1 TRA AOL POCA 
: rw é 





















¥ aU $ 


Whe 
(100,00 82 Cae FIVE LB 


£ 


(1raee (ree tny Viiiet 
oe < (190° 
ue Vito: 
AI WATI AD sowaanavno 

2€ OT 09 (vv. ies 
2 OT OD IVHT.Td.(0.1-HT) 26 


- ‘a rene 
e€ OT OO (1.0. a La 


aAU0T JORG aona083 

Sears ws er 

§ bogey ; 
(L1GGeHT +e EIN a1 

(See ((1T)QG*HT+. bp ovceerodeenh 


Oren 


Bek oe al ee 


SL=0. 
DC 12 [=1,NCP 
SV=SV4+VD(1I,N)#DCO(T1) 

12 SL=SL4+LB(1I,N)#BCO( I) 
DC 11 I=l,NCP 
X(ITeN)=LB(I,N)#BCOC(I)/SL 
Y(I,N)=VD(I,yN)# DCO(T)/SV 
XT(I,N)=X( IN) 
YT(I»N)J=YCI9N) 

ll CONTINUE 


CALCULATE NEW TEMPERATURE PROFILE BY BUBBLE POINT 


DO 13 N=1l,NN 

Q(N)=0. 

TI(N)=TON) 

TN=T(N) 

CALL BUBPT(TNyXTyN) 
15 T(NJ=TION) +WT#(TN-TIO(N)) 
13 CONTINUE 


ENTHALPY BALANCES 


Q(NG1L)=Cl 
QING2)=Q2 
S$Q@C=0. 
N=1 
KENTH=2 
CALL ENTHAL(T(N) »YsKENTH)N) 
HVL=ENTH#V(1) 
KENTH=4 
J=NT4#1 
CALL ENTHAL(TLO»XT,KENTH)J) 
HAB=ENTH#LOR 
N=NN 
KENTH=3 
CALL ENTHAL(T(N) »XsKENTH)N) 
HB=ENTH#L (NN) 
DO 18 N=2,NN 
SQC=SQC+C(N-1) 
KENTH=3 
CALL ENTHAL(T(N-1) XsKENTH,N-1) 
HTL=ENTH 
IF(KDATA~EQ.1) GO TO 21 


CONVENTIONAL ENTHALPY BALANCES 


KENTH=2 

CALL ENTHAL(T(N) s¥9KENTH»N) 
HTV=ENTH 

DEN=HTV—-HTL 

VN=(HV1-HAB+(LOR-V(1L)) #HTL+SQC)/DEN 
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LN=LOR+V(N)-VO1L) 
IF(VN.LTLO-) VNEVIN)/2. 
IF(LNe~LT.«O.) LN=L(N-1)/2. 
V(NJ=VN 

LN=LOR+V(N)-VO1L) 

LNN=LN 

QC=0. 

GO ThO: «22 


CONSTANT COMPOSITION ENTHALPY BALANCES 


21 KENTH=5 
CALL ENTHAL(T(N) +YT,»KENTH,N) 
HPAB=0. 

HPV1=0. 

HPL=0. 

DO 17 I=iyNCP 
HPAB=HPAB+PEF(I)#LOX(T) 
HPVIL=HPVI+PH(I)*Y(1,1) 

17 HPL=HPL+PH(1I)#X(1T,N-1) 
DEN=HPL-HTL 
LN=(LOR#HPAB-HAB+HV1-V(1)#HPV1+SO0C)/DEN 
VIN)=V(01L)4+LN-LOR 
LNN=LN 


Q@ METHOD ENTHALPY BALANCE SECTION 


22 IF(V(N).GT~VMAX1L) VIN) =VMAXL 
IF(V(N).LTJVMINI) VIN) =VMINI 
LNN=LOR4tV(N)-V(1) 

L(N-1)=LNN 
QC=LNN#DEN-LN#DEN 
SQC=SOC+QC 

18 CONTINUE 

HF=HV1+HB-HAB+SQC 


TRIAL AND ERROR SOLUTION FOR FEED TEMPERATURE 


TF=T(NN) 

N=NT+2 

CALL TRIAL(TF,HF»N) 
GO TO 50 


QCUTPUT ANSWERS 


51 CONTINUE 
WRITE(6,110) NOPROB 
WRITE(6,149) 
WRITE(6,150) 
WRITE(6,151) 
WRITE(6,152) 
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34 


id 


DO 34 I=1lsNCP 
WRITE(6,153) ( 
CONTINUE 
WRITE( 6,154) 
WRITE(6,144) 
WRITE(6,145) 
WRITE(6,146) 
WRITE(6,147) 
DO 77 N=1,NN 
WRITE(67148) 
CONTINUE 
WRITE(6,169) 
WRITE( 69157) 
WRITE(6,168) 
CALL EXIT 

END 


CPNT(19J),J=1l,22),TOP(I),BOT(I) 


TOPS,BOTS 


Ne TIN) VIN) LIN) 


TF 
TH 
ITER 
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APPENDIX B ANNX 2 


THIS PROGRAM SOLVES REBOITLED ABSORBER PROBLEMS USING THE 
BUBBLE POINT PROCEDURE WITH EITHER THE CHAO AND SEADER 

DATA CORRELATION OR THE NGAA AND YEN AND ALEXANDER DATA 
COMBINATION 


REAL LyLFyLO,LOT,»LOR,LOX,LByLFD,LNyLNN,LOUDIL,LT 
INTEGER FC 
COMMON NCyNHCy,NCP,P,FRyFLyFV,XF(1L5),YF (15) »ZF(15) »ENTH 
COMMON XM(15),YM(15)52M(15),L0(15),X(15,35) ,Y¥(15935) 
COMMON XT(15535),YT(15,35) ,BBMIX( 35) »AA0B(35),20(35) 
COMMON AH(15)-BH(15),CH(15),DH(15),EH(15),FH(15) 
COMMON JH2,JC1yJN2,J02,JC0,JC02,JH2S,DDELMX(35) »KDATA 
COMMON TC(15),PC(15),W(15) ,DELTA(15),V1(15) ,A(16,6) 
COMMON EQ(15) 
COMMON PH(15) 
DIMENSION TH(2),DTH(2),THN(2),GP(252),G6T(2),G6(2) 
DIMENSION wWCO(15),WD(15),WW(15),DC0(15),8C0(15) 
DIMENSION TOP(15),BOT(15),AF(30)55(30) »CPNT(15,2) 
DIMENSION LB(15,30)5VD(15,30),VFB (30) »sLFD(30),BD(15) 
DIMENSION L(30),V(30),7T(30),TI(30),VF(30),LF(30) 
DIMENSION LOX(15),VT(30),LT(30),ER(15, 35) 5Q(30) 

100 FORMAT (2513) 

101 FORMAT(8F10.8) 

102 FORMAT(10OF8.0) 

103 FORMAT(1X,2Fle1ly F749 F6039F702433X%y2A6) 

104 FORMAT(1X,4E14.7) 

L105 FORMAT (3F10.5338X, 2A6) 

110 FORMAT(1LH1L/1HK,40X,1L2HPROBLEM NOe 12) 

LLl FORMAT (40X,1L7HPROBLEM STATEMENT) 

112 FORMAT (1LHK,39X,17HREBOLLED ABSORBER) 

113 FORMAT(LHL,17Xs1L5HAw’ COLUMN DATA) 

114 FORMAT (LHJ,19X,8HPRESSURE,3X,13HNO’ OF PLATES 24Xy 
LLLHFEED ENTERS, 3X,1L7HSIDE STREAM TAKEN) 

115 FORMAT(21X,6HIPSTA) ,5X,LOH( INCLUDING, 5X_y8HON PLATE, 
L4H NOws5XyL4HFROM PLATE NO.) 

116 FORMAT (33X,9HREBOILER) ) 

LL7 FORMAT(1HJ,19X,F6.1,10X,12914X,12915Xy12) 

118 FORMAT (1LHJ,19XyF6.1,10X912914Xe12,8X,8H(NO SIDE, 
18H STREAM)) 

119 FORMAT(1LHL,17X,13HB. FEED DATA) 

120 FORMAT(LHJ,37X,1L9OHTEMPERATURE (DEG F),8X,9HCONDITION) 

121 FURMAT(20X,LLHFEED NUMBER, I2911X_yF6e1,12X, 
LLEHSATURATED VAPOUR) 

122 FORMAT(20X,1LLHFEED NUMBER,I2511X,F6e1l,11Xy 
LL7HSUB-COOLED LIQUID) 

123 FORMAT(20X,1LLHFEED NUMBER, I2911XyF601,12Xy 
LLGHSATURATED LIQUID) 

124 FORMAT(20X,1L1LHFEED NUMBER,I2,11XyF6e1913Xy 
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LLZHVAPOUR/LIQUID) 

125 FORMAT (20X,12HABSORBER OIL,12X,F6.1,11Xy 
LL7HSUB-COOLED LIQUID) 

126 FORMAT(1LHK,41X,4HFEED, 16X,12HABSORBER OIL) 

L127 FORMAT (21X_y LOHCOMPONENTSs4Xe8HLB MOLES s5Xy4HMOLE »7X, 
L8HLB MOLES,5X+4HMOLE) 

128 FORMAT (35X_,8HPER U.sT.93Xy8HFRACTION,5X,8HPER UseToy3Xo 
L8HFRACTION) 

129 FORMAT (20X_2A692X5F9.39 3X 9F 1049 5X pF 90 39 3X aF 104) 

130 FORMAT(1LHK,19X,26HSPECTFIED TOP PRODUCT RATE,5X, 
126HSPECIFIED SIDE STREAM RATE) 

131 FORMAT(LHJ,21X%,F9.3,14H LB MOLES/U.T.17XsF9.3, 
114H LB MOLES/U.T.) 

132 FORMAT(LHL»17X,17HC. ENTHALPY DATA) 

133 FORMAT(LHJ,19X»y283HCHAO-SEADER CORRELATION USED) 

134 FORMAT(LHJ,19X,34HYEN AND ALEXANDER CORRELATION USED) 

135 FORMAT (LHKs32X,32HZERO PRESSURE ENTHALPY CONSTANTS) 

136 FORMAT (21X_ LOHCOMPONENT Ss 10X»2HAHs9X92HBHy9X_2HCH, OX, 
12HDH) 

137 FORMAT (20X, 2A6,2X,4E11.4) 

138 FORMAT(LHL»,17Xy26HD. EQUILIBRIUM RATIO DATA) 

139 FORMAT(1H1) 

140 FORMAT(1HJ319Xy35HNGAA PULYNOMIAL DATA AT CONVERGENCE, 
LL1H PRESSURE =,F7.0,5H PSIA) 

141 FORMAT(LHJ»20X»y LOHCOMPONENTS 9 6X92HTC 8X2 2HPCs8Xe_1HWy 
17Xy5HDELTA,» 3X9 2HV1) 

142 FORMAT (20Xy2A692X9F Tol yo 3XeF lola 3X Fle 4 9 3XyF6035F 822) 

143 FORMAT(1LHL,17X,23HE»’ INITIAL ASSUMPTIONS) 

144 FORMAT (1LHJs39X,15HPLATE VARIABLES) 

145 FORMAT(20X,9HPLATE NOw+5XyLLHTEMPERATURE,» 5X, 
LLLHVAPOUR RATE,5X,1LIHLIQUID RATE) 

146 FORMAT(36X,7H(DEG F),8X,1LOH(LB MOLES) ,6X,1LOH(LB MOLES)) 

147 FORMAT(51Xy,LOH(PER UseTo)s6X,1OH(PER U.T.)) 

148 FORMAT(23X512,1L0XsF7.259XyFEe298X F822) 

149 FORMAT ( LHK,39X,15HPRODUCT STREAMS) 

150 FURMAT(1HJ,34X,27HTOP PRODUCT BOTTOM PRODUCT ,3Xy 
LLLHSIDE STREAM) 

151 FORMAT(21X+1OHCOMPONENTS»4X,LOH(LB MOLES) 15Xy 
LLOH(LB MOLES) +5X,1OH(LB MOLES)) 

152 FORMAT(35X,lLOH(PER U.sT.),5XslLOH(PER UnTo)55Xy 
LLOH(PER U.T.)) 

153 FORMAT(20X_2A694X F903 9 6X9 F903 ¥ 6X9 F923) 

154 FORMAT(LHJ,19X,LLHTOTAL RATES s5X9F9.396X9F 9.3 76X_F 9. 3) 

155 FORMAT(1LHJ,19X,L6OHITERATION NUMBER, 14) 

156 FORMAT(1LHL) 

157 FORMAT(1HJ,19X,6HTHETA(,12,3H) =9F9.6) 

158 FORMAT(1LHJ,19X»38HMAXIMUM VAPOUR RATE ABOVE FEED PLATE 
LF9.3) 

159 FORMAT(LHJ+19X»38HMAXIMUM VAPOUR RATE BELOW FEED PLATE 
LEQ23i 

160 FORMAT(LHJ,19X,38HMINIMUM VAPOUR RATE ABOVE FEED PLATE 


1F9.3) 
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162 FORMAT(1HJ,19X,38HMINIMUM VAPOUR RATE BELOW FEED PLATE =, 
L1F9.3) 
163 FORMAT(LHJ,19X,29HTHETA CONVERGENCE TOLERANCE =,)F9.4) 
164 FORMAT (1HJ,19X,38HPRODUCT STREAM CONVERGENCE TOLERANCE =y 
1F9.4) 
165 FORMAT (LHJ,19X,30HTEMPERATURE WEIGHTING FACTOR =,F6.3) 
166 FORMAT(LHK,19X,21HINTER COOLER ON PLATE,13+¢ 
LL14H WITH DUTY OF,F10.0,9H BTU/U.T.) 
167 FORMAT(1LHK,19X,21HINTER HEATER ON PLATE, 13, 
L14H WITH DUTY OF,F1O.0,9H BTU/U.T.) 
168 FORMAT(LHL,19X,22HNUMBER OF ITERATIONS =,14) 
169 FORMAT(1HJ,19X,26HCALCULATED REBOILER LOAD =5;£16.8, 
19H BTU/U.T.) 


REAC IN DATA 


ITER=0 
READ(5,100) NCyNHC yNNyNF1lyNQ1yNQ2 »FCy»KDATA,NOPROB 
NCP=NC+4+NHC 
NNFL=NF141 
MNF L=NF1-1 
NT=NN41 
READ(5,101) TOPPR,SSRyP,FTsTLO2Q1,Q2,PCONV 
READ(5,101) (TIN) ,N=1,NT) 
READ(5,101) (L(N),N=15NT) 
READ(5,101) (VIN),N=1,NT) 
READ(5,101L) VMAX1,VMAX2,VMIN1,VMIN2,THV, VVoWT 
IF(KDATA.EQ.-1) GO TO 3 
READ(5,100) JH2,JC1l,JN2,J025JCOyJCO2sJH2S 
READ(5,101)°((A(1I,J),1=1,16),J=1 96) 
DO 1 T[=1,NC 
READ(5,103) TC(IT),PC(I) »WI(T) ,DELTA(I) »VL( IT) 9 (CPNT (19d). J=192) 
READ(5,101) ZM(1I),LO(I) 

lL READ(5,104) AH(1),BH(1),CH(I),DH(T) 
IF(NCP.LE-NC) GO TO 2 
CALL PHYS(CPNT) 
6G<T0 2 

3 DO 4 T=1,NCP 
REAC(5,105) ZCI), TCI) sPC(IT),(CPNT(I,J),J=1 22) 
READ(5,101) ZM(I),LO(T) 

4 READ(5,101) AH(1),BH(I),CH(1),OH(I) sEH(1) »FHCI) 
CALL PHYS(CPNT) 


CALCULATE MOLE FRACTIONS IN FEED STREAMS 


2 FR=0. 
LOR=0. 
DO 5 T=1l,NCP 
FR=FR+ZM(1) 

5 LOR=LOUR+LO(1) 
V(1L)=TCPPR 
L(NT)=FR+LOR-—TOPPR-SSR 
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DO 6 IT=1,NCP 
ZF(I)=ZM(1)/FR 
EGXt1T)=LO(1)/LOR 
N=NT+3 
XT(IsN)=LOX(1) 
N=NT+2 

6 XT(I,N)=ZF(T) 


CALCULATE FEED ENTHALPIES AND CONDITIONS OF FEED 


KENTH=4 

N=NT+3 

CALL ENTHAL(TLO,XT»,KENTH,N) 
HAB=ENTH#LOR 

N=NT+1 

IF(FC.EQ.2) GO TO 8 
LFEPGSEQ@SAar'GO TO 7 
IF(FC.EQ.4) GO TO 7 


FLASH FEED 


CALL FLASH(FT»2N) 
DO 9 I=1l,NCP 
XT(IT,»N)=XF(1) 
9 YTCIsNI=YF(T) 
KENTH=3 
CALL ENTHAL(FT,sXTyKENTH,N) 
HX=ENTH 
KENTH=2 
CALL ENTHAL(FTsYT,KENTHyN) 
HY=ENTH 
GO TO 10 


BUBBLE POINT FEED 


7 FL=FR 
FV=0. 
DO 11 If=1,NCP 
XM(T)=ZM(1) 
YM(1I)=0. 
XF(IT)=ZF (1) 
YF(1I)=0. 
XT(1yN)=XFC(T) 

11 YT(IsN)=YFCI) 
CALL BUBPT(FT,XT»N) 
KENTH=3 
CALL ENTHAL(FT,XTyKENTHyN) 
HX=ENTH 
HY=0. 
GO TO 10 


DEw POINT FEED 
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12 


10 


13 


PRINT OUT PROBLEM STATEMENT 


65 
66 


B81 
80 


83 
82 


FL=0. 

FV=FR 

DQ 12 I=1l,NCP 
XM(I)=0. 
YM(T)=Z2M(T) 
XF(I)=0. 
YFCIT)=ZF(1) 
XT(ITyN)J=XF(T) 
YTCIy»N)=YF(T) 
CALL DEWPT(FT,YT,»N) 
KENTH=2 


CALL ENTHAL(FTsYTyKENTHyN) 


HY=ENTH 

HX=0. 
HF=(FV#HY+FL#HX)/FR 
SHF=SHF4FR#HF 
DO 13 N=1,NT 
LFD(N)=0. 
VFB(N)=0. 
VF(N)=0. 
LF(N)=0. 
N=NFI1 
VF(N)=FV 
LF(N)=FL 


WRITE(6,110) NOPROB 
WRITE(6,111) 
WRITE(6,112) 
WRITE(6,113) 
WRITE(6,114) 
WRITE(69115) 
WRITE(6,116) 


IF(SSR.~LT.2O-20E-10) GO TO 65 
WRITE(6,117) PyNTyNF1lyNN 


GO TO 66 

WRITE(6,118) P,NT,NFL 
WRITE( 6,130) 
WRITE(6,131) TOPPR,SSR 
IF(NQ1.GT.NT) GO TO 80 
IF(Q1.LT.O0-) GO TO 81 
WRITE(6,166) NQ1,QL 

GO TQ 80 

WRITE(6,167) NQ1,Q1 
IF(NQ2.GT.NT) GO TO 82 
TFUQZSLT.0.) GO TO 83 
WRITE(64166) NQ2,Q2 

GO TO 82 

WRITE(6,7167) NQ2,Q2 


IF(VMINL.~LT.0-00001) GO TO 84 
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60 
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62 


63 
64 


69 


67 
68 
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WRITE(G,158) VMAX1L 
WRITE(6,160) VMINL 
WRITE(6,9159) VMAX2 
WRITE(6,162) VMIN2 
WRITE(6,163) THY 
WRITE(6,164) VY 
WRITE(63165) wT 
WRITE(6,119) 
WRITE(6,120) 

J=1 

IF(FC.EQ.2) GO TO 60 
IF(FC.EQ.3) GO TO 62 
PECEG.EGLS9CE0 TO 61 
IF(FC.EQ.5) GO TO 63 
GO TO 64 

WRITE( 6,121) JeFT 

GO TO 64 © 
WRITE(6,122) JSyFT 

GO TO 64 
WRITE(6,123) JysFT 

GO TO 64 
WRITE(6,124) JsFT 
WRITE(6,125) TLO 
WRITE( 6,126) 
WRITE(6,127) 

WRITE (6,128) 

DC 69 IT=1l,NCP 


WRITE(6,129)(CPNT( I,J) 5J=1ls2),Z2M(1),ZF(1),LO(I),LOX(T) 


CONTINUE 

WRITE(6,139) 
WRITE(6,132) 
IF(KDATA.EQ.1) GO TO 67 
WRITE( 6,133) 

GO TO 68 

WRITE(6,134) 

WRITE( 6,138) 
IF(KDATA.EQ.1) GO TO 73 
WRITE(6,133) 

GEN TOTS 

WRITE(6,140) PCONV 
WRITE( 6,143) 

WRITE (6,144) 
WRITE(6,145) 

WRITE( 6,146) 
WRITE(6,147) 

DG 72 N=1,NT 

WRITE (65148)No TIN) »VON) gLIN) 
CONTINUE 

WRITE(6,139) 


C BEGIN ITERATION 
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51 ITER=ITER+41 
WRITE(6,155) ITER 
KENTH=5 
DQ 15 N=1,NT 
LELKNATA~£90.1) GO TO 20 
IFCITERSELTS2)'G0.TO! 24 
DO 75 I=1,NCP 
XT(I,N)=X(1I,N) 

75 YTC(I»N)=YCIN) 

20 CALL K(T(N),»KENTH,N) 
GO TO 46 

14 CALL KIDL(T(N)) 

46 DO 15 I=lyNCP 

15 ER(I,N)=EQ(I) 

Wl=0. 

TOPS=0. 

BOTS=0. 

CALL FPTSW 

DC 30 I=1,NCP 

DO 19 N=1,NT 
AF(INJ=LINISCERCIN) #VIN)) 

19 S(N)=1./AF(N) 
LOI=LO(I) 


CALCULATE B/D RATIOS UP THE COLUMN 


AA=1. 
BB=0. 
DD=1. 
EE=1. 
DC L7 N=1,NT 
J=14+NT-N 
SF=S(J) 
IF(JeGT.MNF1) GO TO 18 
EESTEEsSF 
DD=DD#SF+1. 

18 BB=BB#SF+l1. 
AA=AA#SF 

17 CONTINUE 
ZT=LOI+DD#2ZM(1)-EE#YM(T) 
C1=1.+SSR#(ISINT)41.2)/(L(NN)—SSR) 
BDOUP=ZT/((AA+8B#C1)#(LOI+ZM( 1) )-(C1l#ZT)) 
BUP=(LOI4+ZM(1))/(C1+1./BDUP) 
DUP=BUP/BDUP 


CALCULATE B/D RATIOS DOWN THE COLUMN AND L/B 


AA=AF(1) 
BB=1. 

DO 21 N=3,NFL 
AFI=AF(N-1) 
AA=AA*AFI 


cvyY 
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BB=RBBeAFI+1. 

VFB(MNF1)=YM(1I)/BUP 

ZB=0. 

LB(I,NT)=1. 

NX=NN-1 

LB(ITyNN)=LINN) #(SO(NT)+1.2)/(°0L (NN)-SSR) 
DG 23 N=1,NX 

J=1+4+NX—N 

IF(J.EQ.MNF1) ZB=ZM(1)/BuUP 
LB(T,yJ)=LB(1,J+1)*#S(J+1)+C1+VFB(J)-Z6 
VBNFI=LB(I,NFL)#S(NF1) 

AK=AA+BB 

CJ=XM(1)-ZM(1)-BS#LOI 

ZT=ZM(1)+LOI 

WB=C1-1. 

wWOT=1-+WB#BDUP 
BODOWN=(AK#ZT+CJ#WDT)/(VBNFL#ZT-CJ) 
DDOWN=2ZT/(BODOWN+WDT ) 

BDOWN= BDDOWN#CDDOWN 


CALCULATE V/D 


24 


LOD1L=1.-LOI/DDOWN 


ZD=0. 
LFD(NF1)=XM(1)/0D0OWN 
VD(I,1)=1. 


DG 24 N=2,NT 
IF(Ne-EQeNF1) ZD=ZM(1)/DDOWN 
VD(ITyN)=VD(1,N-1)#AF(N-L)+LODL+LFD(N)-ZD 


CALCULATE ROUND-OFF ERROR RATIOS 


Zz 


26 


28 


27 
29 


BDTOP=1./(S(1)#LB(I,1)) 
BONFL=AF(NF1)#VO(1T,NFL)/LB(I,NF1) 
RTOP=BDTOP/BDUP 
RNFL=BDNF1/BDDOWN 
IF(ABS(RTOP-1.).LE.ABS(RNF1-1.)) GO TO .28 
BD(IT)=BDDOWN 

TOP(1)=DDOWN 

BOT(I)=BDOWN 

DO 25 N=1,NFl 
LB(ITyN)=VDO(1I,N)#AF(N)/BD(1) 

DG 26 N=NNF1,NT 
VD(TyN)J=LB(1sN)*S(N)#*BD(T) 

GO TO 29 

BD(1T)=BDUP 

TOP(1)=DUP 

BOT(1)=6UP 

DO 27 N=1,NT 
VO(IT»N)=LB(I,N)#S(N)#BD(T) 
WOCT)=AF(NN) #VD( TyNN)®SSR/LOUNN) 
WW(T)=WO(T)#*#TOP(T) 
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Ca Cy te 


Cec) CF 


Wl=WltWw(1) 
BOTS=B8O0TS+ROT(I1) 

30 TOPS=TOPS+TOP(I) 
CALL FPTSW 


CHECK CONVERGENCE CRITERIA 


IF(ABS(TOPPR-TOPS).GT.VV) GO TO 40 
IF(ABS(W1-SSR).GT.VV) GO TO 40 
IF(CABS(TH(2)-1.0).GT.THV) GO TO 40 
IF(ABS(TH(1)-1.0).GT.THV) GO TO 40 
DO 55 N=1,NT 
IF(ABS(TI(N)-T(N)).GT.0O.1) GO TO 40 
55 CONTINUE 
GCG TO 50 


THETA CONVERGENCE PROCEDURE 


40 DO 31 J=1,2 

31 TH(J)=l1. 

32 DO 33 J=1,2 
GT(J)=0. 
DG 33 M=1,2 

33 GP(J,M)=0. 
CALL FPTSW 
DO 34 I=1,NCP 
ZFT=ZM(1)4+L0(1) 
DCO(I)=ZFT/(1.+TH(1)*#BD(1I)+TH(2)#WD(1)) 
DEN=DCO(1I)/ZFT*DCO(1) 
BCO(I)=TH(1)#BD(1)#*#DCO(T) 
GP(1l,1)=GP(1,1)-BD(1I)#DEN 
GT(1)=GT(1)+DCO(T) 
DE GSSReLF.0O.LOE-10) GO TO 34 
WCO(IT)=TH(2)*WDO( 1) #0CO(T) 
GP(1l,2)=GP(1,2)-WD(1I)#DEN 
GP(2,1)=GP(2,1)-BD(1)*#DEN#TH(2)#WD(1) 
GP(2,2)=GP(2,2)+DEN#wD( 1) #((ZFT/DCO( 1) )-wO( IT )#TH(2)) 
GT(2)=GT(2)4wCO(1) 

34 CONTINUE 
CALL FPTSW 
G(1)=TOPPR-GT(1) 
G(2)=SSR-GT(2) 
IF(ABS(G{(1)).GT.~TOPPR#0.0001) GO TO 36 
IF(ABS(G(2)).-GT.~TOPPR#0.0001) GO TO 36 
GO TO 35 

36 IF(SSR.~LT.~O-LOE-30) GO TO 47 
ANUM=(G(1)/GP(1,1))-(G(2)/GP(2,1)) 
ADEN=(GP(1,2)/GP(1,1))-GP(2,2)/GP(2,1) 
DTH(2)=ANUM/ ADEN 
DTH(L)=(GIL)I—-DTH(2)#*GP(1,2))/GP(191) 

48 DO 37 J=1,2 
THN( J) =TH(J)+DTH(J) 
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IF(THN(J).LT~O7) THN(JS)=TH(J)/2. 
37 TH(J)=THN(J) 

GODT Se 
47 DTH(1)=G(1)/GP (151) 

DTH(2)=0. 

GO TO 48 


CALCULATE NEW MOLE FRACTIONS ON EACH PLATE 


35 DO 38 N=1,NT 
VT(N)=0. 
LT(N)=0. 
DO 39 T=1,NCP 
VT(N)=VO(TyN)#DCOCTI)+VT(N) 
39 LT(N)J=LT(N)+4+LB(1,N)#BCO(T) 
DG 38 I=ly,NCP 
X(I»N)=LB(I2N)*BCO(I)/LT(N) 
38 Y(IyN)=VD(1TyN)*DCO(T)/VT(N) 


CALCULATE NEW TEMPERATURE PROFILE BY BUBBLEPOINT 


DO 41 N=1,NT 

Q(N)=0. 

TI(N)J=TIN) 

TN=T(N) 

CALL BUBPT(TN, X_N) 

TINJ=TICN) +WwT#(TN-TIO(N)) 
41 CONTINUE 


ENTHALPY BALANCES 


Q(NQ1)=Q1 

Q(NQ2)=Q2 

SQC=0. 

SFR=0. 

N=1 

KENTH=2 

CALL ENTHAL(T(N)s¥sKENTH,N) 
HVL=ENTH#V(1) 

N=NT 

KENTH=3 

CALL ENTHAL(T(N) »XsKENTH»N) 
HB=ENTH#*LIUNT) 

N=NN 

KENTH=3 

CALL ENTHAL(T(N) »XeKENTH)N) 
HW1l=ENTH#SSR 

DO 42 N=2,NT 
SFR=SFR4+VF(N)4+LF(N-1) 
S$QC=SQC+Q(N-1L) 

KENTH=3 

CALL ENTHAL(T(N-1) 9XsKENTHsN-1L) 
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HTL=ENTH 
IF(KDATA.~EQ.1) GO TO 49 


a CONVENTIONAL ENTHALPY BALANCES 


KENTH=2 

CALL ENTHAL(T(N)»Y¥,KENTH,N) 
HTV=ENTH 

DEN=HTV-HTL 

VN= (HV 1-HAB+(LOR-V(1L)) #HTL+SQC)/DEN 
IF(NeLT.NF1) GO TO 53 
VN=VN-FV#{(HTL-HY)/DEN 

IF(N.LT~NNF1) GO TO 53 

VN=VN+ (FV#(HTL-HY) +FRe( HTL-HF) )/DEN 
CONTINUE 

IF(VN.eLT.O.) VN=V(N)/2. 

V(N)=VN 

QC=0. 

LN=V(N)+LOR+SFR-V(1) 

GO TO 54 


C CONSTANT COMPOSITION ENTHALPY BALANCES 


C 
C 
a3 
C 
C 
49 
70 
43 
C 
s e 
C 


KENTH=5 

CALL ENTHAL(T(N) »¥sKENTHyN) 
HPYF=0. 

HPF=0. 

HPV1=0. 

HPAB=0. 

HPL=0. 

DO 70 I=1l,NCP 
HPYF=HPYF+PH(I)#*YF(T) 
HPF=HPF+PH(I)#ZF(T) 
HPVL=HPV1+PH(1I)#Y(1I,1) 
HPAB=HPAB+PH(1)*LOX(T) 
HPL=HPL+PH(1)#X(1I,N-1) 
DEN=HPL-HTL 
LN=(LOR#HPAB-HABt+HV1—-V (1) *#HPV1L+SQC)/DEN 
IF(N.LT.NF1) GO TO 43 
VFDH=VF(N)# (HPYF-HY)/DEN 
LN=LN+VFDH 

IF(Ne-LTs«NNF1) GO TO 43 
LN=LN+FR#(HPF-HF)/DEN-VFDH 
CONTINUE 

QC=0. 

LNN=LN 
VIN)=V(1)4LNN-LOR-SFR 


METHOD ENTHALPY BALANCE SECTION 


PE UNSCT.NF1) GG FO 44 
IF(V(N).«GTe«VMAX2) VON) =VMAX2 
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IF(V(N)-LT~VMIN2) VIN) =VMIN2 
GO TO 45 
44 IF(V(N).~GT.«VMAX1L) VIN) =VMAX1 
IF(V(N).LT.VMINL) V(N)=VMINL 
45 LNN=V(N)—VO1L)+LOR+SFR 
IF(LNN.LT.O.) LNN=L(N-1L)/2. 
L(N-1)=LNN 
NX=N-1 
OC=LNN#DEN-LN#DEN 
42 SQC=SQC+QC 
QR=HV 1+HB+HW1—-SHF-HAB+SQC 
GO TO ‘51 


CUTPUT ANSWERS 


50 CONTINUE 
WRITE(6,110) NOPROB 
WRITE(6,149) 
WRITE( 6,150) 
WRITE(6,151) 
WRITE(6,152) 
DG 76 T=1,NCP 
WRITE(6,153)(CPNT(1,J),J=1,2),TOP(I) »,BOT(I) pWw(Il) 
76 CONTINUE 
WRITE(69154) TOPS,BOTS,W1 
WRITE(6,144) 
WRITE(6,145) 
WRITE(6,146) 
WRITE(69147) 
DCO 77 N=1L,NT 
77 WRITE( 6,148) NyT(N) VIN) LIN) 
WRITE(6,169) QR 
DO 78 J=122 
78 WRITE(6,157) JyTH( J) 
WRITE(6,168) ITER 
CALL EXIT 
END 
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ABSORBER PROGRAM USING THE SUM RATES PROCE 


100 
101 
102 
103 
104 
105 
106 
107 
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AND SEADER DATA 


APPENDIX B ANNX 3 


DURE WITH CHAO 


REAL LO,LOT,LODLyLOTsLNyLNNogbylLByKyKCONST 


REAL LOX,LT 

COMMON NC,NHC,NCP,P 

COMMON XT(15535) 5YT(15,35) 5X(15,30),Y(1 
COMMON TC(15),PC(15),W(15),DELTA(15),V1 
COMMON AH(15),8H(15),CH(15),DH(15),BBMI 
COMMON JA1l,JA2,JA3,J5A4,JA5,JA6_J5A7,0DEL 
DIMENSION DL(30),DV(30) 


5230) yHLIQsHVAP 
(15),EQ(15),A(16,6) 
X(35) ,AA0B(35),2ZC(35) 
MX(35) 


DIMENSION AX(30)98X(30),DX(30) »EP(30),DP (30) 


DIMENSION LT(030),VT(30) sFEH(30),9(30) 9H 
DIMENSION DGH(30531)sHLN(2)eHVN(2) 
DIMENSION LOX(15,1),BCU(15) 


L(30),HV(30),E(30),DT(30) 


DIMENSION F(15),L0(15)5T(30),TI(30) L130) ,V(30) »AF(30) 5S(30) 


DIMENSION TOP(15),80T(15),8D0(15),VD(15, 
DIMENSION CPNT(15,2),ZF(15) 


INPUT/OUTPUT FORMATS 


FORMAT(1X,2513) 

FORMAT (8F10.0) 

FORMAT(6F10.4) 

FORMAT(4F10.4) 

FORMAT(1HJ,2HL(,12,98H) ENTH =,E15.8,15H 
FORMAT(14,F8.2,13,E16.8) 
FORMAT(1LHJs2HV(,12,8H) ENTH =,E15.8915H 
FORMAT(1LXs2Fle le Fl ety F60.39F le2933X92A6) 
FORMAT(1X,4E14.7) 
FORMAT(LH1L/1LHK,40X,12HPROBLEM NO. 12) 
FORMAT(40Xy,L7HPROBLEM STATEMENT) 
FORMAT( LHK,43X%»,8HABSORBER) 
FORMAT(LHL»,17X,15HA. COLUMN DATA) 
FORMAT(1LHJ,27X,1L5HPRESSURE (PSIA) ,10X,y 


LL6OHNUMBER OF PLATES) 


FORMAT(LHK,19Xs21HINTER HEATER ON PLATE 


LL4H WITH DUTY OF,F10.0,9H BIU/U.T.) 


FORMAT (1LHJ,31Xy,F7e1,22X,12) 


30),LB(15330),DC0(15) 


STREAM HEAT =,E€15.8) 


STREAM HEAT =,9E15.8) 


213, 


L118 FORMAT(1LHK,19X,2LHINTER COOLER ON PLATE sI1 3,5 


19 
120 


L14H WITH DUTY OF,F1l0.059H BITU/U.T.) 


FORMAT(1LHL,17X,13HB. FEED DATA) 


FORMAT(1LHJ,37X,LOHTEMPERATURE (DEG F)»8X»y9HCONDITION) 
121 FORMAT(20X,4HFEEDs 20XeF6el912Xy1L6HSATURATED VAPOUR) 
125 FORMAT(20X,12HABSORBER OIL y12XsFGele11Xy 


LL7HSUB-COOLED LIQUID) 


126 FORMAT(LHK,41X,4HFEED, 16X,12HABSORBER OIL) 
127 FORMAT(21X» LOHCOMPONENTS,4X98HLB MOLES» 5Xe4HMOLE 7X,» 
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18HLB MOLES,y5X,4HMOLE) 

128 FORMAT(35X_8HPER UseT or 3Xy8HFRACTION, 5X_8HPER UsToe3Xy 
L8HFRACTION) 

129 FORMAT (20X_ 2A64 2X4 F939 3X9 F 7049 5X F903 9 3X aF 104) 

130 FORMAT(1HK,19X,28HSPECIFIED TOP PRODUCT RATE =,F10.3, 
114H LB MOLES/U.T.) 

132 FORMATC(LHL»17X,17HC. ENTHALPY DATA) 

133 FORMAT(LHJ,19X,28HCHAD-SEADER CORRELATION USED) 

138 FORMAT(LHL,17X,26HD. EQUILIBRIUM RATIO DATA) 

139 FORMAT(1H1L) 

143 FORMAT(LHL,17X,23HE. INITIAL ASSUMPTIONS) 

144 FORMAT(1HJ,39X,15HPLATE VARIABLES) 

145 FORMAT (20X,9HPLATE NO. ,5X,LLHTEMPERATURE »5X,y 
LLLHVAPOUR RATE,5X,1LLHLIQUID RATE) 

146 FORMAT (36X»57H(DEG F),y8X,1LOH(LB MOLES) +7X,LOH(LB MOLES) ) 

147 FORMAT(51X,1lOH(PER U.T.)9/7XeLOH(PER U.T.)) 

148 FORMAT(23X%y12,10XyF7.219XyF8.258XyF 8.2) 

149 FORMAT ( LHK,39Xy1L5HPRODUCT STREAMS) 

150 FORMAT (1HJs39X%» 7HDRY GAS»16Xy,8HRICH OIL) 

151 FORMAT (21X, LOHCOMPONENTS,7X,1LOH(LB MOLES) »14X, 
LLOH(LB MOLES)) 

152 FORMAT(38X,1lOH(PER UseT.)y14X,1LOH( PER U.T.)) 

153 FORMAT (20X%,2A6,65X%_,F1003514X,F10.3) 

154 FORMAT(LHJ,19X,1L1LHTOTAL RATES» 7XyF10.3514X,F 10.3) 

155 FORMAT(LHJS,19X,1L6HITERATION NUMBER, 14) 

157 FORMAT (1LHJ,19X_,7HTHETA =,F9.6) 

163 FORMAT (1HJ,19X,29HTHETA CONVERGENCE TOLERANCE =,F9.4) 

164 FORMAT(1LHJ,19K,38HPRODUCT STREAM CONVERGENCE TOLERANCE =, 
1F9.4) 

165 FORMAT(LHJ,19X,y30HTEMPERATURE WEIGHTING FACTOR =,F6.3) 

168 FORMAT (1LHJ,19X,y22HNUMBER OF ITERATIONS =,14) 


READ IN PROBLEM DATA 


IFEED=0 
ITER=0 
WT=1.0 
READ(5,100) NCyNHCyNNyNQL,NQ2,NOPROB 
NT=NN+1 
NCP=NC+4+NHC 
READ(5,101)(F(1I),If=1l,NCP) 
READ(5,101)(LO0(1),1I=1,NCP) 
READ(5,101)(T(N),N=1,NN) 
READ( 5,101) (L(N),N=1lyNN) 
READ(5,101)(V(N)_,N=1_)NN) 
READ(5,101) P,yTLO,DS,Q1,Q2,TF 
VV=.001#DS 
READ(5,100) JAlyJA2, JA3,JSA4_JA5, JAGB,JSAT 
READ(5,101)((A(1,J3),1T=1,16) ,J=196) 
DO 26 [=1,NC 
READ(S,1LOTITC( I) sPC(I) pWI1) sDELTA(T) »V1I( 1), (CPNT(I,J),J=122) 
26 READ( 5,108) AH(1I),BH(I),CH(I),DH(1) 
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CALCULATE FEED MOLE FRACTIONS AND ENTHALPIES 


| 


230 
nr 


ITF(NCP.LE.~NC) GO TO 27 
CALL PHYS(CPNT) 
MNN=NN-1L 


FT=0. 
LOT=0. 
DO 23 I=l,NCP 
FT=FT+F(T) 
LOT=LOT+LO(1) 
DG 230 I[=1,NCP 
LOX(I,1)=LO(I)/LOT 
ZPCIR=FtI+/FT 
J=NT+2 
XT(I,J)=ZF(1) 
J=NT 41 
XT(I,J)=LOX(1,1) 
KENTH=2 
J=NT+2 
CALL ENTHAL(TF,XT+»KENTH,J) 
ENTH=HV AP 
HF=ENTH#FT 
KENTH=4 
J=NT+4+1 
CALL ENTHAL(TLO,XTy,KENTH, J) 
ENTH=HLIQ 
HAB=ENTH#LOT 


PRINT OUT PROBLEM STATEMENT 


a3 
66 


65 


WRITE(6,110) NCPROB 
WRITE(6,111) 
WRITE(6,112) 
WRITE(6,113) 
WRITE(6,114) 
WRITE(69117) PyNN 
IF(NQ1L.~GT.NN) GO TO 66 
Peron. ts.0.')) GO TO 63 
WRITE(6,118) NQ1,Q1 
GO TO 66 

WRITE(6,116) NQ1,Q1 
IF(NQ2.GT.eNN) GO TO 62 
PP{Q2.uP0.)) GO TO 65 
WRITE(6,118) NQ29Q2 
GO TO 62 

WRITE(6,116) NQ2,Q2 
WRITE(6,164) VV 
WRITE(6,165) wl 
WRITE(6,119) 
WRITE(6,120) 
WRITE(6,121) TF 
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WRITE(6,125) TLO 
WRITE(6,126) 
WRITE(6,127) 
WRITE (61128) 
DG 69 I=1,NCP 
WRITE (62129) (CPNT( 1yJ) ,J=1,2),F (1) yZFC1) pLOCT) pLOX( 191) 
69 CONTINUE 
WRITE(6,130) OS 
WRITE (6,139) 
WRITE(6,132) 
WRITE (6,133) 
68 WRITE(6,138) 
WRITE(67133) 
74 WRITE(6,143) 
WRITE (6,144) 
WRITE( 67145) 
WRITE(64146) 
WRITE( 6,147) 
DO. 72 N=1,NN 
WRITE(65148)NyT(N) VIN) gLEN) 
72 CONTINUE 
WRITE( 6,139) 
C 
C BEGIN SOLUTION OF PROBLEM 
C 
1000 CONTINUE 
ITER=ITER+1 
WRITE(6,155) ITER 


CALCULATE K RATIOS, ABSORPTION FACTORS AND STRIPPING 
FACTORS 


fail pe ga hal a 


1001 DO 2 I=1,NCP 
IPaRIVEReLT.2) GO TO 28 
CO 25 N=1,NN 
KENTH=5 
CALL K(TIN),KENTH,N) 
AF(N)=L(IN)/(EQ(I)*V(N)) 
25 S(N)=1./AF(N) 
GO $16.29 
28 DO 30 N=1,NN 
CALL KIDL(T(N)) 
AF(NJ=LIN)/(EQUI)#VIN)) 
30 S(N)=1-/AFI(N) 
29 LOI=LO(1) 


| FI=F(1) 
= C 
_ CC CALCULATE B/D RATIOS 
eC 
AA=AF(1) 
BB=1. 


DO 1 N=3,NT 
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AFI=AF(N-1) 
AA=AA#AFI 
1 BB=BBeAFI+1. 
BD( 1)=(AAs#LOT+4+FI# (AA+BB-1.))/(FI4+BB#*#LOI ) 
D=(LOIT+F1I)/(1.4+BD(1)) 
TOP(1I)=D 
B=BD(1I)#D 
BOT(1I)=8 


CALCULATE L/B AND V/D VALUES 


LODL=FI/D-BD(1I) 
VD(I,1l)=1. 
DO 3 N=2,NN 
3 VDO(IyN)=AF(N-1)#*VD(1I,N-1)4LOD1 
FIB=LO1/B-1./BD(1) 
LB(I,NN)=1. 
DO 4 N=1,MNN 
J=1L+NN-N 
4 LB(I,J-1L)=S(J)*LB(1,J)+F1B 


CALCULATE ROUND-OFF ERRORS 


BDTP=1./(LB(I,1)*S(1)) 
BOB=VD(1,NN) #AF(NN) 
RTP=BDTP/8D(T) 
RB=BDB/BD(1) 
IFCABS(RTP—1.).LE.-ABS(RB-1.)) GO TO 5 
DO 7 N=1,NN 
YT XLB(IyNI=VDCIysN) #AF(N)/BD(1) 
GO TO 200 
> CO 6 N=1,NN 
6 VD(I,N)=LB(1T,N)#S(N)#BO(T) 
200 CONTINUE 
2 CONTINUE 
BOTS=0. 
TOPS=0. 
DO 24 [=1,NCP 
BOTS=BOTS+BOT(1) 
24 TOPS=TOPS+TOP(I) 


CALCULATE NEW FLOW PROFILES 


98 DO 11 N=1,NN 
SV=0. 
SL=0. 
CO 12 I[=1,NCP 
SV=SV+VD(1I,N)#TOP(T) 
12 SL=SL+LB(1,N)#B0T( 1) 
LT(N)=SL 
VT(N)=SV 
DV(N)=V(N)-VT(N) 


a 










“Te anes 
- et aa ‘ 08 bg j 
rng 
A ei oe 


— oe, aor a at ¥ > 
23U sav G\W od te 


ST yh? aM 
(1)08 Bip jh 
fot Pe , VV 
WA.S=W E OC 
10008 41-ny Love Gh-aepmeerel 
: (1)G8\.1-8N 












er nite 
(AWM AA® Uns 1} <3 j 
Mieka 


2 OT OOD tk. s-envesient ele 
tas pee 
er aay Un ane Hayat 


) 


(Tia (ni2e(el) 194 


Aa ia heals 


Cy Cay 


C25) ©? 


Li 


DLINJ=L(NI-LT(N) 
VINJ=VTON) 
LINJ=LTIN) 


CALCULATE NEW MOLE FRACTIONS 


DO 11 I=1l,yNCP 
X(IyN)J=LB(1+N)*BOT(I)/SL 
Y(LyN)=VO(1I,N)*#TOP(T)/SV 
XTCITyN)=X(1yN) 
YT(I,NJ=Y(I,N) 

CONTINUE 


CALCULATE NEW TEMPERATURE PROFILE 


a4 


3 35] 


34 


oo 


OF 


38 


DO 31 N=1,NN 
Q(N)=0. 
TI(N)J=T(N) 
FEH(N)=0. 
FEH(1)=HAB 
FEH(NN)=HF 
Q(NQL)=Q1 
Q(NQ2)=02 
MN=NN41 
DO 32 N=l,NN 
DELT=0.5 
KQ=1 
TON)=TICN)-DELT 
KENTH=2 
CALL ENTHAL(T(N) sYT»KENTH,N) 
ENTH=HVAP 
HVN(KQ)=ENTH 
KENTH=3 
CALL ENTHAL(T(N) »XT,KENTH,N) 
ENTH=HLIQ 
HLN(KQ)=ENTH 
IF(KQ.GT.1) GO TO 35 
T(N)J=TI(N)+C0ELT 
KQ=2 
6G110' 33 
DELT=DELT#2. 
DX (N)=VON)#(HVN(2)-HVN(1))/DELT 
BX (NJ=L(N)#(HLEN(2)-HLN(1))/DELT 
AX(N)=BX(N)4#DX(N) 
HL(N)=HLN(1) 
HV(N)=HVN(1) 
DO 36 N=1,NN 
M=N 
Pathe t<2) GO TO 37 
AA=(-L(N-1))#HL(N-1) 
BB=0. 
IF(NeLT~NN) GO TO 39 
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36 


41 


43 


42 


39 


E(N)=-Q(N)-FEH(N)+AA4L (N) #HL (N)4V(N) #HV(N)4BB 
E(N)=-E(N) 

GO TO 36 

AA=0. 

GO TO 38 

BB=(-V(N+1))#*#HV(N4+1) 

GO TO 40 

CONTINUE 

EP(1)=E(1)/AX(1) 

DP(2)=DX(2)/AX(1) 

NX=NN-1 

DO 41 N=2,NN 
EP(N)=(E(N)+BX(N-1L) #EP (N-1))/(AX(N)-BX(N-1L) #DP(N)) 
IF(N»GT.~.NX) GO TO 41 
DP(N#1)=DX(N41)/(AX(N)-BX(N-1L)#DP(N)) 
CONTINUE 

DT(NN)=EPI(NN) 

DO 43 N=1,NX 

J=NX+1-N 

DT(J)=EP(J)4DP(J4+1)*DT(J+1) 

KTEMP=0 

DO 42 N=1,NN . 

TINJ=H=TIC(N) 4WT#DT(N) 
IF(ABS(OT(N)).GT.e01) KTEMP=KTEMP+1 
CONTINUE 

IF(KTEMP.LT.1) GO TO 99 

GO TO 1000 

CONTINUE 


PRINT OUT RESULTS 
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ADJUST FEED TEMPERATURE TO FIT DESIRED OVERHEAD PRODUCT 


WRITE(6,110) NOPROB 
WRITE(6,149) 

WRITE(6,150) 

WRITE(6,151) 

WRITE( 6,152) 

DO 16 I=1,NCP 
WRITE(6,153)(CPNT(1,J),J=1l92),TOP(I) sBOT(T) 
CONTINUE 

WRITE(6,154) TOPS,BOTS 
WRITE(6,7144) 

WRITE(6,145) 

WRITE(67146) 

WRITE(6,147) 

DO 77 N=1,NN 

WRITE(6,148) No T(N)o VIN) oLIN) 
CONTINUE 

WRITE(6,168) ITER 


AND GO THROUGH A NEW ITERATION 
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IF(IFEED.GT.O0) GO TO 91 
QQ1l=V(1)-DS 
IF(ABS(QQ1).LT.VV) GO TO 97 
TFL=TF 

IF(QQL.GT.0.) GO TO 90 
TF=TF+20. 

IFEED=1 

GG T0O' 17 

TF=TF-20. 

IFEED=1 

SE°TOo°lLs 

QQ2=V(1)-DS 
IF(ABS(QQ2).-LT.-VV) GO TO 97 
TF2=TF 
SLOPE=(QQ2-QQ1)/(TF2-TF1) 
TF=TF2-QQ2/SLOPE 

TF1=TF2 

QQ1=QQ2 

wo ta 17 

CALEY EXTT 

END 
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APPENDIX B ANNX 4 


THIS PROGRAM ATTEMPTS TO SOLVE A REBOILED ABSORBER PROBLEM BY THE 
SUM RATES METHOD 


COMMON XT(15,35),YT(15, 35) 
COMMON NCyNHCyNCPyPyFR(3),FL(3)FV(3) 9XF (1593) eYF(15_,3) ZF (15,3) 
COMMON XM(1593)9YM(15,y3),ABLX(1591) 9X(15_35) 5 V¥(15_35) sHLIQyHVAP 
COMMON TC(15),PC(15),W(15) ,DELTA(15),V1(15) ,EQ(15) ,A(16,6) 
COMMON AH(15),8H(15),CH(15),0H(15),BBMIX(35) ,AA0B(35),2C0(35) 
COMMON JA1l,JA2,JA33JSA4 9 JA5y JAG SAT, DDELMX(35) 
DIMENSION DV(30),DL(30) 
DIMENSTON CPNT(15y2),E( 30) 
DIMENSION AX(30)58X(30),0X(30) »DP(30),EP (30) »HV(30) sHL(30) 
DIMENSION Q(30),FEH(30),DT(30),LT(30) VT (30) sHVN(3) »HLN(3) 
DIMENSTON TH(5),DTH(5) 5 THN(5) y»GP(555),6T(5) »G(5) 
DIMENSTON WCO(15),WD(15),wWww(15),DC0(15),BC0(15),TOP(15),BOT(15) 
DIMENSTON ZM(15,3),L0(15),AF(30)4S(30) 
DIMENSION LB(15,30),VD(15,30),28(3)12D0(3),VFB(30) »LFD(30) »BD(15) 
DIMENSION L(30),V(30),T(30),TI(30),VF (30) ,LF(30) 

DIMENSION ABLM(15,1) 

INTEGER ABLF,FC 
REAL KyKCONSTyLFolsylLByLOrLODeLFDs JJy TIT oLNyLNNyLODIL 
REAL LT,yLHyLHN 
REAL LOI 


INPUT/OUTPUT FORMATS 


100 FORMAT(2513) 

101 FORMAT(5E16.8) 

102 FORMAT(1X,4E14.7) 

103 FORMAT(1Xy2FTe1lyFT.49F6.39F 102933X92A6) 

104 FORMAT (1HJ, LOHCONVERGENT) 

105 FORMAT(1X,3(12,F8.0)) 

L106 FORMAT(1X,11E11.4) 

107 FORMAT(8F10.4) 

109 FORMAT (10F8.0) 

110 FORMAT (6F10.4) 

LL1 FORMAT(4F10.4) 

112 FORMAT(1X,12,3E16.8) 

113 FORMAT(1X,2H Ny6X_y2H Ty1l5Xy2H Lyl5Xy2H V) 

114 FORMAT (1LHJy4HW( 1), 3X,5E16-8) 

L117 FORMAT(LHJ, 2HL(,12912H) ENTHALPY =9E£15.28,22H STREAM HEAT CONTENT 
1,615.8) 

118 FORMAT (1HJ,2HV(,12y12H) ENTHALPY =,£15.28,22H STREAM HEAT CONTENT 
1,E15.8) 

120 FORMAT(1X,4E16.8) 

121 FORMAT(8X_2HAH») 15X y2HBH,15Xy2HCHy 15X_2HDH) 

122 FORMAT(1X,8E16.8) 
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FORMAT(1X,;27HMOLES OF COMPONENT IN FEED,13) 
FORMAT(1X,36HMOLE FRACTIONS GF COMPONENTS IN FEED,I13) 
FORMAT(1LX,24HMOLE FRACTION IN ABS LIQ) 

FORMAT(1HJ,+25HMOLES OF ABSORBER LIQUID ,E15.8) 
FORMAT(1X,25H L/B RATIOS FUR COMPONENT, 13) 

FORMAT (6(1X,12,E16.8)) 

FORMAT(1X,25H V/D RATIOS FOR COMPONENT,13) 

FORMAT (iX,3HFT=,E15.8) 

FORMAT (1LHJ,24HCALCULATED TOP PRODUCT =,E15.8) 
FORMAT(1X,3HTH(,12,2H)=,E15.8) 

FORMAT (1X,3HW1L=,E15.8) 

FORMAT(LHJS»s2H Ny 3H Ty8Xe9LHXelL5X_yLHY 214X92HSL14X_2HSV) 
FORMAT (1X,213,4E16.8) 

FORMAT(1X,2HV(,12, 2H)=,E15.893H Ll,1292H)=,E15-8,4H QC=,E15.8) 
FORMAT(1X,15HREBOILER LOAD =,E15.8) 

FORMAT (1LXs4HRTP=,E15-8,6H RFL=,E15.8) 

FORMAT (1X,2HT(,12, 2H)=,F&15.8,5X,E15.8) 

FORMAT(1HJ»,LOHINPUT DATA) 

FORMAT (LHK,22HNUMBER OF COMPONENTS =,13) 
FORMAT(LHJs45HTOTAL NUMBER OF PLATES (INCLUDING REBOILER) =,13) 
FORMAT(1HJ,28HSPECIFIED TOP PRODUCT RATE =,E1528,6H MOLES) 
FORMAT(1LHJ,L7HCOLUMN PRESSURE =,F621;,5H PSIA) 
FORMAT(LHJ,27HSIDE STREAM FROM PLATE NN =,€15.8) 
FORMAT(LHL,L7HITERATION NUMBER ,13) 


READ IN PROBLEM DATA 


WT=0.225 

THV=.001 

BPTV=.0001 

VVL=0.2 

ITER=0 

KITER=10 

READ(5,100) NCyNHC sNNyoNF1yNQ1yNQ2 
READ(5,101) QR,Q1,Q2 

NCP=NC4NHC 

NNFLI=NFL+1 

MNFL=NFI-1 

NT=NN+1 

READ(5,10L) FR(1),ABLR»,TOPPReSS1loP 
VV=.001#TOPPR 

READ(5,105) FC,FT,ABLF,ABLT 
READ(5,109)(T(N) »N=1l_NT) 
READ(5,109) (V(N) eN=LoNT) 
READ(5,109) (LIN) yN=1lyNT) 
READ(5,100) JAlL,yJA2,JA3,% JA4,JSA5_y JAG, JAT 
READ(5,1L07) (( ACL J), 1T=1 916) sJ=196) 
DO L T=L,NC 

READ(5,103) TC(1)yPC(I) »W(1) »DELTA(I) »VL(1) 5 (CPNT (I,J), J=1ly2) 
READ(5,101) ZM(1I,1),ABLM( 1,1) 
READ(5,102) AH(1),BH(I) »CH(I),DH(T) 
IF(NCP.LE.NC) GO TO 2 
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CALL PHYS(CPNT,ZM,ABLM) 
2 CONTINUE 
WRITE( 6,900) 
WRITE(6,902) NCP 
WRITE(6,903) NT 
WRITE(6,905) P 
WRITE(6,904) TOPPR 
WRITE(6,906) SS1 
WRITE(6,121) 
WRITE(69120)(AH(T) »BHCI),CH( I) sOH(IT)»1T=1,NCP) 


C CALCULATE FEED RATES 


ABT=0. 
ZT=0. 
DO 4 I[=lyNCP 
ABT=ABT+ABLM(I,1) 
4 ZT=ZT+ZM(151) 
V(1)=TOPPR 
LINT)=ZT+ABT—SS1-TOPPR 
N=NT+2 
DO 3 IT=lyNCP 
ZF(1,1)=ZM(1,1)/FR(1) 
ABLX(1,1)=ABLM(I,1)/ABT 
LO{(I)=ABLM(I,1) 
XT(I,N)=ABLX( 191) 
3 CONTINUE 
J=1 
WRITE(6,123) J 
WRITE(6,122)(ZM( 1,3) 91T=12NCP) 
WRITE(6,124) J 
WRITE(6; 122) (ZF(1,J3),IT=1,NCP) 
WRITE(6,126) ABLR 
WRITE( 6,125) 
J=1 
WRITE(6,122)(ABLX(1,J),IT=1,NCP) 
WRITE(6,113) 
DO 11 N=1,NT 
WRITE(69112)NyT(N) pL (IN) VIN) 
11 CONTINUE 
C 
C SET. FEED ICONDITIONS 
C 
WL=SS1L 
KENTH=4 
N=NT+2 
CALL ENTHAL(ABLTsXTsKENTH gN) 
ENTH=HLIQ 
HAB=ENTH#ABLR 
WRITE( 6,117) NyENTH,HAB 
N=NT41 
IFt(FC.EQ.1) GO TO 7 
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I bRGVEQ2).GO:'TO 8 
J=l 
CALL FLASH(FT.J,N) 
WRITE(6,170) FL(1),FV(L) 
170 FORMAT(1HJ, 3HFL=,E16.8,5H FV=,E16.8) 
WRITE(6,142) 
DO 5 T=1,NCP 
WRITE(69143) NeIeXF(1,1),YF(I,1) 
XTC I»N)=XF(I,1) 
5 YT(IsN)=YF(1I,1) 
KENTH=3 
CALL ENTHAL(FT»XT,KENTHyN) 
ENTH=HLIQ 
HX=ENTH 
KENTH=2 
CALL ENTHAL(FT,YT,KENTH,N) 
ENTH=HVAP 
HY=ENTH 
GO TO 6 
7 FLUJ)=FRUJ) 
Fv(J)=0. 
J=1 
DG 90 I=1l,NCP 
XM(I,J)=ZM(1I,J) 
YM(I,J)=0. 
XF(I,J)=ZF( I,J) 
YF(1T,1)=0. 
XT(I»N)=XF(I,1L) 
90 YT(IsN)J=YF(I>1) 
KENTH=3 
CALL ENTHAL(FTsXT,KENTH,N) 
ENTH=HLIQ 
HX=ENTH 
HY=0. 
GO TO 6 
8 FL(J)=0. 
FV(J)=FR(J) 
J=1 
DG 91 I=1,NCP 
XM(I,J)=0- 
YM(IyJ)=ZM(1,J) 
XF(I,J)=0. 
YF(I,1l)=ZF(1I,1) 
XT(I,N)J=XF(I,1) 
91 YT(L»NI=YF( 1,1) 
CALL DEWPT(FT,YT9N) 
KENTH=2 
CALL ENTHAL( FT» YTyKENTH »N) 
ENTH=HVAP 
WRITE(6,118) NyENTH 
HY=ENTH 
HX=0. 
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C 
C 
C 


CPC <4 Cae oe 


6 HF=(FV (J) #HY+FL( J) #HX)/FR(J) 
SHF=HF#FR(J) 
WRITE(69135) FT 
WRITE(6,118) NyENTH,SHF 
DO 9 N=1,NT 
VFIN)=0. 
9 LF(N)=0. 
N=NFL 
VF(NJ=FV(J) 
LFI(N)=FL(J) 


BEGIN ITERATION 


1000 ITER=ITER+1 
WRITE(6,910) ITER 
CALL FPTSW 
DO 44 I=1,NCP 
IF(ITER.«LT.2) GOTO 14 
KENTH=5 
CALL K(T(N) + KENTH,N) 
DO 92 N=1,NT 
AF(N)=LIN)/(EQ(T)#V(N)) 
92 S(N)=1./AF(N) 
GO TO 15 
14 DO 13 N=1,NT 
CALL KIDL(T(N)) 
AF(N)=LIN)/(EQ(T)#VIN) ) 
13 S(N)=1./AF(N) 
15 LOI=LOC1) 


CALCULATE RATIOS 


UP 


JJ=1. 
Il=l. 
BB=O0. 
AA=1. 
DO 17 N=1,NT 
J=1+NT-N 
SFHS(J) 
IF(J-GTsMNF1) GO TO 18 
JJ=JJ*#SFHL. 
TIT=11#SF 

18 BB=BB#SF+Hl. 
AA=AA*SF 

17 CONTINUE 
ZT=LOI+JJ#ZM(1,1)-L1#YM(I,1) 
Cl=1.+SSL#(S(NT)+1.2)/(L(NN)-SS1) 
BDUP=ZT/{( (AAtBB*C1L)*(LOIT+ZM( 191) )-(C1#*2ZT)) 
BUP=(LOI+ZM(I,1))/(C1+1.0/BDUP ) 
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DUP=BUP/BDUP 
WRITE(6,133) BDUP,DUP,BUP 
133 FORMAT(1X,y7H 8DUP=,E15.8,%7H DUP=,E15.8,7H BUP=,E15.8) 
AA=AF(1) 
BB=1. 
DO 21 N=3,NF1 
AF I=AF(N-1) 
AA=AA* AFI 
21 BB=BBs#AFI+1. 
C 
C CALCULATE VFB AND ZB 
4 
DO 34 N=1,NT 
LFD(N)=0. 
34 VFB(N)=0. 
VFB(MNF1)=YM(1I,1)/BuUP 
Z8(1)=0. 
LB(I,NT)=1. 
NX=NN-1 
LB(I,NN)=LOINN) #(S(NT)41.2)/¢L(NN)-SS1) 
DO 26 N=1,NX 
J=1L4+NX-N 
IF(J~-EQ.MNF1) ZB(1)=ZM(1,1)/BUP 
LB(I,J)=LB(1,J+1)#S(J+1)4+C1+VFB(J)-ZB(1) 
26 CONTINUE 
VBNFL=LB(ITyNFL)*S(NF1) 
AK=AA+BB 
CJ=XM(1,1)-ZM(1,1)-BB*LOI 
ZT=ZM(1,1)4LOI 
WB=C1-1.0 
WOT=1.4wB#BDUP 
BODOWN=(AK*®ZT4+CJ#WDT)/(VBNFL#®ZT-CJ) 
DDOWN=ZT/( BCDOWN+WDT ) 
BDOWN=BDDOWN#DD0OWN 
WRITE(69134) BDDOWN,DDOWN, BDOWN 
134 FORMAT (1X, 7HBDDOWN=,E15.8, 7H DDUWN=,E15.8,7H BDOWN=,E15.8) 
. 
C CALCULATE LFD AND XD 
fs 
LOD1L=1.-LOI/DDOWN 
ZO0{(1)=0. 
LFD(NF1)=XM(1I,1)/0D0WN 
VDO(I,1l)=1. 
DO 45 N=2,NT 
IF(N-EQ.NF1) GO TO 47 
GO TO 998 
47 ZD(1)=ZM(1,1)/DD0OWN 
998 SPARE=LOD1-Z0D(1)+LFD(N) 
45 VO(I,N)=AF(N-1)#VD( 1 9N-1L)+SPARE 


C CALCULATE ROUND OFF ERROR 
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BDTP=L.~/(S(1)#LB( 1,1) ) 
BOFL=AF(NF1)#VDO(I,NF1)/LB(I,NFL) 
RTP=BDTP/BO0UP 
RF1l=B8DF1/BDODOWN 
WRITE(6,160) RTP,RFL 
FEGAGS CH PP HPS PSL E.ABS(RF1-1.)) GO TO 53 
BC(1)=8DO0O0OWN 
TOP(IT)=DDOWN 
BOT(1)=BDOWN 
DO 55 N=1,NF1l 

55 LB(I»N)=VOCI,N)#AF(N)/BD(T) 
DO 57 N=NNF1,NT 
57 VDO(I,NISLB(19N)#S(N)#BD(T) 
GO TO 56 
53 BDil)=8DUP 
TOP(1)=DUP 
BOT(1I)=BUP 
DO 54 N=1,NT 
54 VD(IyNJ=LB(1IyN)#S(N)#BD(T) 
56 WO(L)=AFINN) #VD( Ty NN)#SSI/LINN) 
44 CONTINUE 
CALL FPTSW 
W1=0. 
TOPS=0. 
DO 440 I=1,NCP 
WW(T)=wO(T)#TOP(T) 
Wl=W1l+ww(T) 
440 TOPS=TOPS+TOP(1) 
WRITE( 6,114) (WW(I),T=1,NCP) 
WRITE(6,138) Wl 
WRITE(6,136) TOPS 


DO 66 N=1,NT 

LT(N)=0. 

VT(N)=0. 

DO 67 I=l,NCP 

VT(N)J=VT(N)4VD( IT sN)#TOP(T) 
67 LT(N)=LT(N)4+LB(1,N)#BOT(T) 

DLIN)=LT(N)-LIN) 

DV(N)=VTIN)-V(N) 

L(N)J=LT(N) 

VINJ=S=VT(N) 

DO 66 T=1L,NCP 

X(ITyN)=LB(1T»N)*#BOTCT)/LT(N) 

Y(I,N)=VD(I,N) #TOP(II/VT(N) 
66 CONTINUE 


TEMPERATURE PROFILE BY SUM RATES METHOD 


DG 675 N=1,NT 
Q(N)=0. 
TI(N)J=T(N) 
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FEH(N)=0. 
Q(NQ1)=Q1 
Q(NQ2)=Q2 
Q(NT)=QR 
FEH(1)=HAB 
FEH(NF1L)=HF#FR(1) 


C TEMPERATURE PROFILE BY SUM-RATES METHOD 


663 


666 


661 


659 


662 


664 


673 


672 


669 


665 


MT=NT+4+1 

DO 662 N=1,NT 

DELT=0.5 

KQ=1 

T(N)=TIUN)-DELT 

KENTH=2 

CALL ENTHAL(T(N),Y,KENTH,N) 
ENTH=HVAP 

HVN(KQ)=ENTH 

KENTH=3 

CALL ENTHAL(T(N) »X,KENTH,N) 
ENTH=HLIQ 

HLN(KQ)=ENTH 

IF(KQ.GT.1) GO TO 661 
TINJ=TION)+4+DELT 

KQ=2 

GO TO 663 

T(N)J=TIIN) 

KQ=3 

GO TO 603 

DELT=DELT#2. 

BX(NJ=LT(N) #(HLEN(2)-HLN(1L))/DELT 
DX(NJ=VT(N) #(HVN(2)-HVN(1L))/DELT 
AX(N)=DX(N)+4+BX(N) 
IF(NSEQLNN) BX(N)=BX(N)-SS1L#BX(N) /LTOUNN) 
HL(N)=HLN(3) 

HV(N)=HVN(3) 

CONTINUE 

DO 665 N=1,NT 

PriNaLT.2)} GO TO 672 
AA=—-LT(N-1L)#HL(N-1L) 
IF(N.GT.NN) GO TO 669 
BB=-VT(N+L)#HV(N+1) 
E(N)=-Q(N)—FEH(N) +AA4L TON) #HLON) +VT(N) #HV(N) +BB 
E(N)=-E(N) 

GO TO 665 

AA=0. 

GO TO 664 

BB=0. 
AA=-(LT(N-1)—-SS1)#HL(N-1) 
60 T0G..673 

CONTINUE 
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EP(LI=E(L)/AX(1) 
DP(2)=DX(2)/AX(1) 
DO 667 N=2,NT 
EP(N)=(E(N)4+BX(N-1)#EP(N-1))/0AXK(N)-BX(N-L)#DPI(N) ) 
IF(Ne~GT.NN) GO TO 667 
DP(N+1)=DX(N41)/(04AX(N)-BX(N-L)#DP(N)) 
667 CONTINUE 
DT(NT)=EP(NT) 
DO 679 N=l,NN 
J=NN41-—N 
679 DT(J)=EP(J)4+DP(J4+1)*#D0T(J+1) 
WRITE(6,106)(DT(N),N=1L,NT) 
WRITE( 6,150) 
150 FORMAT(1Xs2H Ny 7Xy2H Ty l4Xy2HDT 1 4X_92H Vel4Xe2HDV_14X—92H Ly1l4X, 
L2HDL ) 
KTEMP=0 
681 DO 680 N=1,NT 
IF(ABS(DT(N)).GE20.01) KTEMP=KTEMP41 
T(N)=TI(N) 4+WT#DT(N) 
TF(T(N).~GT.~550.) T(N)=550. 
IF(T(N).~LT.O.) T(N)=0. 
WRITE(69151) No T(N)»,DT(IN) 2 VIN) ,CVIN) gL (N) ,DL(N) 
151 FORMAT(1X,12,6E16.8) 
680 CONTINUE 
IF(KTEMP.LT.~1) GO TO 941 
GO TO 1000 
941 WRITE(6,104) 
CALL EXIT 
END 
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AL) 
AAOB (N) 
AF (N) 
AH (IL) 
AK 

AX (N) 
BB 
BBMIX (N) 
BCO (T) 
BD (L) 
BDBOT 
BDDOWN 
BDNF1 
BDTOP 
BDUP 


BDOWN 


BH (I) 
BOT (T) 
BOTS 
BPTV 


BUP 


BX (N) 
CH (I) 


CPNT (I,J) 


Annex 5 


dummy variable 

equilibrium ratio constants 

Am/Bm of Redlich Kwong equation of state 
Absorption factor on stage N for a component 
enthalpy constant 

dummy variable 

an from sum rates matrix solution 

dummy variable 

Be of Redlich Kwong equation 

corrected bjafter 6 factor calculation 

round off error free (b/d) ratio 

(b/d) ) ttom SEH ne 

(b/d) 
(b/) 


Katio 
down 


NFL ratio 
Oe ron ratio 
(b/a) Latio 


moles of component i in bottom product as calculated 
from .(b/d) 


down 
enthalpy constant 
moles of component i in bottom product 
calculated bottom product 


convergence tolerance on bubble point calculations 


moles of component in bottom product as calculated 
from (b/d). 


b from sum rates matrix solution 
n 
enthalpy constant 


component name 
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DCO (TI) 


DDELMX (N) 


DDOWN 


DELTA (T) 


DH (IT) 
DP (N) 
DEL 
DS 


DUP 


FH (I) 
FL 

FR 

FV 
G(J) 


GP (J,K) 
GT (J) 


corrected a; after 8 convergence technique 
bn from Chao-Seader correlation 


moles of component in top product as calculated 
from (b/d) gown 


65 (solubility parameter) 

enthalpy constant 

d' from it rates matrix solution 

convergence tolerance in dew point calculation 


specified top product rate 


moles. of. component in top product as calculated 
from EN oa 


dq. from sum rates matrix solution 

En from sum rates matrix solution 
enthalpy constant for polynomial data 
ENS from sum rates matrix solution 
equilibrium ratio of component i 
equilibrium ratio of component i on plate n 
moles of component i in feed stream 
feed condition 

superheated vapor 

saturated vapor 

saturated liquid 


subcooled liquid , 
vapor/liquid mixture 


O & WN FE 
tou tl 


enthalpy constants for polynomial data 
moLlestof liquid in? feed 
feed rate in moles 


moles of vapor. in feed 


variables in the 6 convergence technique 
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HB 
HV1 
HW1 
JH2 
vel 
JN2 
JO2 
JCO 
JCO2 
JH2S 


KDATA 


KENTH 


L (N) 
LB(I,N) 
TO (1) 
BOX (I) 


LOR 


enthalpy of bottom product 


enthalpy of stream V(1) 


enthalpy of side stream product 


component number of hydrogen 


component number of methane 


component number of nitrogen 


component number of oxygen 


component number of carbon monoxide 


component number of carbon dioxide 


component number of hydrogen sulfide 


switch for data set used 


0 - 
1- 
2- 


Chao-Seader data 
NGAA and Yen and Alexander data 
Polynomial data used 


switch for enthalpy and equilibrium value subroutines 


1 - 


superheated vapor enthalpy 

vapor section of Chao-Seader K value subprogram 

to be used 

saturated vapor enthalpy 

vapor section of Chao-Seader K value subprogram 

to be used 

saturated liquid enthalpy 

Laguzdysection of Chao-Seader K value subprogram 
to be used 

subcooled liquid enthalpy 

liguid section of Chao-Seader K value subprogram 
to be, used 

component molal enthalpies calculated in Yen 

and Alexander data 

complete K value subroutine used in Chao-Seader 


liguid flow’ rate from plate n 


ln/b for component i 


moles of component i in absorber oil 


mole fraction in dean oil 


absorber oil rate 
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LT (N) 


NT 


NN 
NF1l 
NOL 
NQ2 
NC 
NHC 


NCP 


PCONV 
Pe ets) 
Ql 

Q2 
Q(N) 


TH (J) 


THV 


summation of component molal liquid rates from 
plate n 


total number of plates in reboiled absorber 
(including reboiler) 


total number of plates in absorber 

feed plate number 

Intercooler plate number 

Intercooler plate number 

number of conventional components 

number of hypothetical components 

total number of components 

pressure 

convergence pressure 

critical pressure of component i 
intercooler/heater duty of intercooler/heater No. 
intercooler/heater duty of intercooler/heater No. 
intercooler/heater load on plate n (In sum rates 
programs intercooler heat loads are negative) 


(In bubble point programs intercooler heat loads 
are positive) 


round-off error ratios 


stripping factor for a component on plate n 
temperature on plate n 

temporary storage T(N) between iterations 
critical temperature of component i 

feed temperature 

Theta 


convergence tolerance on theta 


i 
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TLO 

TOP (TI) 
TOPS 
V1(T) 

V (N) 

VV 
MDitehe, N) 


VMAX1 
VMIN1 


VMAX2 
VMIN2 


VT (N) 


WW (IL) 
W1 
Stetad aN 


XT (I,N) 


XF (I) 
XM (IT) 
VeCL,N) 


YL) 


temperature of lean oil 

moles of isin top’ product 

calculated top product 

specific volume of component i 

vapor flow rate from plate n 
convergence tolerance on product stream 
v,/9 for component i 


maximum and minimum vapor flow rates for any plate 
above the feed plate 


maximum and minimum vapor flow rates for any plate 
below the feed plate 


summation of component molal vapor rates from 
plate n : 


accentric factor (w) of component i 

corrected WW(I) after theta convergence technique 
w/d for component i 

temperature weighting factor 

moles of component i in side stream 

calculated side stream rate 

Piguidymolestraceion Of sson platern 


tigquidnmolesfraction o£ 1 ‘on plate’ n (temporary 
storage) 


mole. fraction of component i in liquid feed 
moles of component i in liquid feed stream 
vapor mole fraction of component i on plate n 


vapor mole fraction of component i on plate n 
(Temporary storage) 
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YF (TI) 
YM (TI) 
ZC (TI) 


ZC (N) 


ZF (TI) 


ZM (TI) 


mole fraction of component i in vapor feed stream 
moles of component i in vapor feed stream 
critical compressibility factor of component i 


Critical compressibility factor of- mixture on 
plate n 


mole, fraction of i in total feed 


total moles of i in feed 
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APPENDIX C 


SUB-PROGRAMS FOR USE WITH NGAA 


AND YEN AND ALEXANDER DATA 
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APPENDIX C ANNX 1 


SUBROUTINE PHYS(CPNT) 


THIS SUBROUTINE CALCULATES THE TEMPERATURE COEFFICIENTS 
FOR THE NGAA EQUILIBRIUM DATA CORRELATION 


103 


pe 


COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 


NC yNHCyNCP,P,FRyFL,FV,XF(15),YF(15),ZF(15),ENTH 
XM(1L5)eYM(1L5),ZM(15),L0(15),X(15,35) 5¥(15935) 
XT(15935)9¥T(15,35) »,BBMIX(35) ,AA0B(35),2C0(35) 
AH(15),BH(15),CH(15),DH(15),EH(15) »FH(15) 

JH2, SCL, JIN2,J02,J5C0,JCO2,JH2S,DDELMX(35) ,KDATA 
TC(15),PC(1L5)9W(15),DELTA(15),V1(15) .A(1696) 
EQ(15) 


DIMENSION CPNT(15)2) 
DIMENSION C(4),B(7) 
PP=ALOG(P)/10. 

DCO 1 f=1,NCP 

DO 1 JJ=124 


READ(5, 


103) PCVaNKP,KK,(J,B( J) ,J=1,4) 


READ(5,103) PCV yNKPyKKy (J, B(J),J=5,y 7) 
FORMAT (1X,213912,4(12,E15.8)) 


BB=8(1) 
DO 2 J= 


2,7 


BB=BB+B(J)#(PP#e(J-1)) 
A(I,JJ)=BB 


RETURN 
END 
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APPENDIX C ANNX 2 


SUBROUTINE KIDL(T) 


THIS SUBPROGRAM IS A DUMMY PROGRAM TO CORRESPOND WITH THE 
KIDL SUBPROGRAM OF THE CHAO SEADER SET OF SUBPROGRAMS 


COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
RETURN 
END 


NCy»NHCyNCPyP,FReFLyFVyXF(1L5),YF(15) ,ZF(15),ENTH 
XM(15)5¥YM(15),2M(15),LO(15),X(15,35),Y(15935) 
XT(15,35)5sYT(15, 35), BBMIX( 35) ,AA0B (35) ,2C0 (35) 
AH(15),BH(15),CH(15),DH(15),EH(15) yFH(15) 
JH2],JC1,IN2,J5025JCO,JCO2,JH2S,DDELMX(35) »KDATA 
TO(15),PC(15),W(15) ~/DELTA(15) ,V1(15) ,A(1646) 
EQ(15) 




























a ) ae 


eee | 
we 7 a 
S KXWMA =D KIOMS9GA i. or 
ae \ far Tt 


: : 3 
; 7 LP Al, 
4) (TOT SYTPUOREL 
f A j 7 


3HT HTIW GHO9238ROD UT MARDOHY YMMUG A’ 2 MaRDONVBUE 2TH 
2MARVOAVUE JO T32@ AIGA? GAHD BNWT AO MAMDODAIHU 4 
. i ‘3 Te A 


HTS e C21) AS FEL) AV (21) AKe VA De HFG WIy DHA 
(SE p2L Ve FEE ee 1 Ke (AL IOI e (ELIMS.. $2 LEM $21 


(ZED ISN 4 CPE DVECAAS LE DXIMEG (CECI IT Ve eb eel Ww 
(OL PHA C21 PAB FCLING C@LIHD, (2T PHEe LyHA WOMMOD 
ATAGMHs (CE VKMIFGA,g!SSHL ¢ SOIL ODbig SOL SWLe L peso JMMOD 
Cae SLA y CEL) IV FAL VAT IFG, CSL We C2 LIIG, ae \ MO a ; 
; t211p3 nO MOD ,. 
162° #0) See ny 
ake “Hews av = 


rg 

er" " (Mroag ri vay * 
iY ete] f° oe | i. 
Peo 
Wee ee ee 


y¢ , 70 a*iTh 4 ; Ay L. 
Ser Raed Se: me 
oe, 
a” ‘Sat +. 

+99) atk )RORSUGR 

an{Sbs LIN 

ARO TER 

- 


te) 


ee Te Be 


is a Se Be i 


APPENDIX C ANNX 3 


SUBROUTINE K(TysKENTHyN) 


THIS SUBPROGRAM CALCULATES THE K VALUES FOR THE NGAA DATA 


COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 


NC yNHCyNCPyPyFRyFLyFVeXF(15) »YF(15),ZF(15) ,ENTH 
XM(15)5YM(15)92M(15),L0(15)9X(15,35) 5V(154,35) 
XT(15y35),YT(15,35),BBMIX(35) ,AA0B(35),20(35) 
AH(15).BH(15),CH(15),0H(15),EH(15) ,FH(15) 
JH29JSC1sIN2_,J021 ICO, JSCO2) JH2S,DDELMX(35) »KDATA 
TC(15),PC(15),W(15),DELTA(15),V1(15),A(1646) 
EQ(15) 


REAL LKP,LK 
TT=T+459.6 
TT=TT/1000. 
PP=ALOG(P) 


DO 2 I= 


1,NCP 


TLKP=A(Ty1) 


DO 1 J= 


294 


1 TLKP=TLKP+A(1,J)*#(TT##(J-1)) 
LKP=TLKP/TT 


LK=LKP- 


EQ(I)=EXP (LK) 


RETURN 
END 
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SUBROUTINE BUBPTI(T,ByN) 


THIS SUBPROGRAM CALCULATES THE BUBBLE POINT FOR THE NGAA DATA 


ec te 


COMMON NCyNHC,NCP,Py,FRyFLyFV,XF(15)5,YF(15) ,ZF(15),ENTH 
COMMON XM(15),YM(15),2M(15),L0(15),X(15,35) ,Y(15435) 
COMMON XT(15,35),YT(15,35) ,BBMIX( 35) ,AA0B(35),2C(35) 
COMMON AH(15),8H(15),CH(15),DH(15),EH(15) »FH(1L5) 
COMMON JH2,JC1,JN2,J02,J3NC0,5SCO02, JH2Z2S,DDELMX(35) »KDATA 
COMMON TC(15)_,PC(15)9W(15),DELTA(15),V1(15) ,A(16,6) 
COMMON EQ(15) 
DIMENSION B( 15,35) 
BPTV=.0001 
KT=1 
TT=T 
1 SY=0. 
KENTH=0 
CALL K(TT,KENTH,N) 
DO 2 [=l1,NCP 
XT(Iy»N)=B(1I,N) 
2 SY=SY+XT(IsN) #EQ(T) 
S$Q=1.0-SY 
IF(ABS(SQ).LT.BPTV) GO TO 4 
KT=KT-1 
IFUKT.tt.«0) GO TO 3 
SYO=SY 
TO =TT 
TT=TT-50. 
GO TO l 
3 SLOPE=(SY-SYO)/(TT-TO) 
TO=TT 
TT=(SQ/SLOPE)+TT 
S¥G=SY 
GO TO l 
4 T=TT 
RETURN 
END 
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SUBROUTINE DEWPT(T,B,N) 


THIS SUBPRUGRAM CALCULATES THE DEWPOINT FOR THE NGAA DATA 


COMMON NC,NHC,NCP,P,FRyFL,FV,XF(15) »YF(15) »ZF(L5) »ENTH 
COMMON XM(15)5YM(15)9ZM(15) ,L0015)9X(15935) -¥(15,435) 
COMMON XT(15,35)5YT( 15,35) »,BBMIX( 35) ,AAOB(35) »2Z0(35) 
COMMON AH(15),BH(15),CH(15),DH(15),EH(15) ,FH(i5) 
COMMON JH2,JC1,JN2,J02,J5C0,JCO2,JH2S,DDELMX(35) sKDATA 
COMMON TC(15),9PC(15),W(15) »,DELTA(15) »V1(15) »A(1656) 
COMMON EQ(15) 
DIMENSION B( 15,35) 
TT=T 
DPTV=.001 
T= 
SX=0. 
KENTH=0 
CALL K(TTsKENTH»N) 
DG 2 I=1,NCP 
YT(I,N)=8(1,N) 
XX=YT(I,»NI/EQCT) 
SX=SX+XX 
IF(ABS(SX-1.0).LT.DPTV) GO TO 4 
KT=KT-1 
TFAKTL LTO)! GO. TO 3 
S$x0=SX 
TO=TT 
TT=TT+10. 
GO TO l 
SLOPE=(SX-SX0)/(TT-TO) 
TN=((1.0-SX)/SLOPE)+TT 
SX0=SX 
TO=TT 
TT=1N 
GO TO l 
T=TT 
RETURN 
END 
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SUBROUTINE FLASH(T,N) 


THIS SUBPROGRAM CARRIES OUT FLASH CALCULATIONS FOR THE 
NGAA AND YEN AND ALEXANDER DATA SET 


Chonere C2 eee 


COMMON NC,NHC,NCP,P,FR,FL,FV,XF(15),YF(15) »ZF(15),ENTH 
COMMON XM(15)9YM(15)9Z2M(15),L0(15)9X(15535) »¥(15,35) 
COMMON XT(15535),YT(15535),8BMIX(35) ,AA0B(35) ,20(35) 
COMMON AH(15),BH(15),CH(15),DH(15),EH(15),FH(15) 
COMMON JH2,JC1,JN2,J02,J/NC0,JC02,JNH2S,DDELMX(35) »KDATA 
COMMON TC(15),PC(15),W(15),DELTA(15),V1(15) ,A(16596) 
COMMON EQ(15) 
Q=1. 
GG=0. 
VV=.001 
3 GS1=0. 
GS=0. 
KENTH=0 
CALL K(TsKENTH,N) 
DO 1 [=1,NCP 
ZFI=ZF(1) 
GKF=1.-1./EQ(1) 
G=ZFI/(1.-Q#GKF) 
GS=GS+G 
GL=ZFI#*#GKF/((1.-Q#GKF) ##2) 
1 GS1=GS1+G1l 
GS=GS-1. 
IF(ABS(GS-GG).LT.VV) GO TO 2 
GG=GS 
Q=Q-GS/GS1 
GO TO 3 
2 FL=Q#FR 
FV=FR-FL 
DO 4 I=1,NCP 
XF(I)=ZF( I) #FR/(FV*#EQ(I)+FL) 
YF(I)=EQ( 1) #XF(T) 
YM(I)=YF(1)#FV 
4 XM(1I)=XF( I) *FL 
RETURN 
END 
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SUBROUTINE ENTHAL(TF,B,KENTH,J) 


THIS SUBPROGRAM CALCULATES THE ENTHALPIES USING THE YEN 
AND ALEXANDER CATA SET 


Can Genoa nGes 


COMMON NC,yNHC,NCP,P,FRyFL»FVeXF(15)y YF (15) yZF(L5) yENTH 
COMMON XM(15),YM(15),ZM(15),LO(15),X(15535) 5 V¥(15935) 
COMMON XT(15,35),YT( 15,35) yBBMIX( 35) »AAQB(35) »ZC (35) 
COMMON AH(15),BH(15),CH(15),DH(15),EH(15) »FH(1L5) 
COMMON JH2,JCL,JN29J025JCOsJCO2s JH25 »DDELMX(35) »KDATA 
COMMON TC(15),PC(15)9W(15) »DELTA(15),V1(15) ,A(1696) 
COMMON £Q(15) 
COMMON PH(15) 
DIMENSION B( 15,35) 
100 FORMAT(1X,;4H PR=,E15.8,22H OUTSIDE LIMIT KENTH=,12) 
101 FORMAT(1X»4H TR=,£15.8,22H OUTSIDE LIMIT KENTH=,12) 
102 FORMAT(LHJy4OHSUPER HEATED VAPOUR ENTHALPY NOT ENTERED) 
103 FORMAT(LHJ,27HZCP LESS THAN 0.22 KENTH= 12) 
T=TF+460. 
TX=T/1000. 
TCP=0. 
ZoP20. 
HP=0. 
PCP=0. 
WMP=0. 
IF(KENTH.~EQ.5) GO TO 5 
DO 30 I=l,NCP 
ZCP=ZCP+B(1,J)#ZC(1) 
TCP=TCP4+B(1,J)#TC(1) 
HT=AH(1)+BH( 1) *TX+CH(I)#TX##2+DH(1)#TX##3 
HP=HP+B(1L,J)*HT 
30 PCP=PCP+B(1,J)#PC(I) 
P1=3.1415926536 
PR=P/PCP 
TR=T/TCP 
23 GO TO (1529354) ,KENTH 
L WRITE(6,102) 
GC TO 20 
5 1=0 
50 Il=I+l 
PCP=PC(1) 
TCP=TC(1) 
LGP=27¢ 81) 
HP=AH(1)+BH( 1) #TX#CH(1) #TX##2+DH( 1) #TX##3 
: PR=P/PCP 
TR=T/TCP 
> EEL EPR P0T.0-01).OR-(PR-GT.1.0)) LIM=2 


IF(ZCP.LT.O.28) GO TO 10 
DHTC=5.4#(PR#*0.6747)/(1Letl.227#( (~ALOG(PR) ) ##0.503)) 
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40 


41 


42 


12 


43 


44 


15 


45 


GO TO 20 

IF(ZCP.LT.0.26) GO TO 40 

DHTC=5.8*(PR*#*0 .63163)/(1.41.229%((-ALOG(PR) )##0.55456) ) 

GC TO 20 

IF(ZCP.LT.0.24) GO TO 41 
DHTC=6.5#(PR#¥#0.62252)/(1.0+0.76218%(-ALOG(PR) ) ##0.53042) 

GC TO 20 

IF(ZCP.LT.0-22) GO TO 42 
DHTC=7.0#(PR*#0.65135)/(1.0+0.75727%(-ALOG(PR) ) ##0.46108) 

GO TO 20 

WRITE(6,103) KENTH 

GO TO 20 

WRITE(6,100) PRyKENTH 

GO 76 21 

IF((PR.~LT.0.01).0R.~(PR.~GT.~120)) LIM=2 

DUMMY 1=-ALOG(PR) 

IF(ZCP.LT.0.28) GO TO 12 

DHT C=(5.44+3.6485%( DUMMY 1##0.33464))/(1.0-0.0056942# (-DUMMY1) ) 

GO TQ 20 

IF(ZCP.LT.0.26) GO TO 43 
DHTC=(5.8+5.19#(DUMMYL##*0.4963))/(1.0-0.1*%(-DUMMY1) ) 

GO TG 20 

TF ¢ZCP.LT.0.24) GO TO 44 

DHTC=(6.5+4.48#(DUMMY1L )##023952)/(120-0.00185#(—DUMMY1 ) ) 

GO TO 20 

EFRO¢ZCP.LT.0.22) GO TO 42 

DHTC=(7.0+4.5688#( DUMMY1 )##0.333)/(1.20+0.004%(-DUMMY1 )) 

GO TO 20 

IF((PR.~LT.0.01).-OR.(PR.~GT.30.)) LIM=2 
IF((TR.LT.0.5).0R.(TR.GT.1.0)) LIM=1 

DUMMY1=PR-4.2 

DUMMY 2=TR-O.77 

DUMMY 3=ALOG(PR) 

DUMMY4=ALOG(TR) 

TFeCCPeLT.0.28) GO TO 15 
C1=-0.09572107% (DUMMY1 )-9.501235*(DUMMY2 ) 

C2=-17.303898#((DUMMY2 )*#2)-0.3195707#(DUMMYL)#(DUMMY2 ) 

C3=1.368092#DUMMY3+4.22 7096*DUMMY 3#DUMMY4 

C4=3.181639#DUMMY3 *DUMMY4#DUMMY4+9. 707447 

DHTC=C 14+024+C3+C4 

GO TO 20 

BPtZEP.LT.0.26) GO TO 45 

DUMMY 1=PR-4.664 

DUMMY 2=TR-0.-79749 

C1=-0.1368774*DUMMY1-14.56975#DUMMY2 
C2=-7.812724# ( DUMMY 2#* 2)-0.1642482*DUMMY2*DUMMY 1 

C3=1.036851 #DUMMY3 +4 046347 2# DUMMY 3# DUMMY 4 

C4=4.525831*#DUMMY3# (DUMMY4##2)+10.86085 

DHTC=C1+C2+C3+C4 

GO TO 20 

IF(ZCP.LT.0.24) GO TO 46 
C1=-0.1074635*DUMMY1—-15.80132*#DUMMY2 
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C2=-15.18611#( DUMMY 2##*2)-0.1476876#DUMMY1*#DUMMY2 
C3=0.7800774#DUMMY 3+3.154058*DUMMY3#DUMMY4 
C4=2.988533 *DUMMY3 *(DUMMY4##2)+12.28618 
DHTC=C1+C2+C3+C4 

GO TO 20 

IF(ZCP.LT.0.22) GU TO 42 
C1=-.08644293*DUMMY1-12.93889*DUMMY2 
C2=10.81311#( DUMMY 2%#2)-0.1568094#DUMMY1#*DUMMY2 
C3=0.7466842#*DUMMY 34+3.17422#DUMMY 3#DUMMY4 
C4=2.930566*DUMMY3*# (DUMMY4##2)412.72429 
DHTC=C1+C024+C3+C4 

GO TO 20 

WRITE(6,101) TR»KENTH 

GO TO 21 

ENTH=HP—(DHTC#TCP) 

IF(LIM.EQ.2) GO TO 9 

IF(LIM.EQ.1) GO TO 7 

IF(KENTH.EQ.5) GO TO 51 

RETURN 

PH(I)=ENTH 

IF({IL.EQ.NCP) GO TO 22 

GC TO 50 

LIM=0 

IF(KENTHJEQ.5) GO TO 51 

GO TO 22 

END 
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SUBROUTINE TRIAL(TF,HNT,N) 


THIS SUBPROGRAM CALCULATES THE FEED TEMPERATURE FROM 
THE FEED ENTHALPY BY TRIAL AND ERROR 


COMMON NCyNHC,NCP,PyFRyFLeFVsXF(15),YF(15),ZF(15),ENTH 
COMMON XM(15)5YM(15)42M(15),L0(15),X(15,35),Y¥(15535) 
COMMON XT(15435)9YT(15,35),BBMIX(35) ,AA0B(35) »20(35) 
COMMON AH(15),BH(15),CH(15),DH(15),EH(15) ,FH(i5) 
COMMON JH2,JC1yJN2,J02yJCO0,JCO2,JH2S,DDELMX(35) »sKDATA 
COMMON TC(15)y,PC(15) »W(15) »,DELTA(15) 5V1(15) »A(1656) 
COMMON EQ(15) 
TTL=TF 
KENTH=2 
CALL ENTHAL(TT1>XTyKENTH»N) 
QQ1l=(ENTH#FR)—-HNT | 
TT2=TT1l 
iF (QQ1.LT.0.) GO TO 70 
72 TT2=TT2-50. 
GO TO 71 
70 TT2=TT2+50. 
71 CALL ENTHAL(TT2,XT,KENTH,N) 
QQ2=(ENTH#FR)—-HNT 
IF(ABS(QQ1-QQ2).GT.ABS(QQ1)) GO TO 73 
PFIQ@Q1.LT.0.)} GO TO 70 
GO 10 72 
73 ITF(ABS(QQ2).GT-ABS(QQ1)) GO TO 74 
GG TO 75 
74 QQ=QQl 
TT=TTl 
GQ1=Q2 
TT1=TT2 
QQ2=QQ 
TT2=TT 
75 TIZ=(TT1L+TT2)/2.- 
KENTH=2 
CALL ENTHAL(TT3,XT»KENTHyN) 
QQ3=(ENTH#FR)-HNT 
IF(ABS(QQ3).LTeHNT#0.0001) GO TO 76 
WRITE( 6,100) TT1,OQ1eTT22QQ2,TT310Q3 
100 FORMAT(6E16.8) 
IF (ABS (QQ3-—CQL).GT.~ABS(QQ1)) GO TO 79 
IF (ABS (QQ2).GT.ABS(QQ3)) GO TO 81 
QQ1=QQ3 
TT1=TT3 
GO TO 75 
81 QQ1=QQ2 
TT1=TT2 
QQ2=Q03 


————— 
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TT2=1T3 
GO TO 75 
IF (ABS (QQ3).GT-ABS(QQ1)) 
QQ2=0Q3 
TT2=1T3 
GO TO 75 
QQg2=Qdl 
TT2=TTL 
TT1L=1T3 
QQ1=QQ23 
GO TO 75 
TF=TT3 
RETURN 
END 


GG TO 80 


i) a Be 


‘ites teeta ig 


Tie dreaipas 


1 opines iat 


Pals a 


my 2 hee t din i 
@ het ia, id 





_ 


, 1~ (Oe pee 


abet de pte 
. “ote 
ath * Lok > 


ag ‘a i 












é “2 7 
> 
an Sil a 
2 | ripe eh 


4? t .* 


Ci ias 4 ! 

i Secon 22 

-(a%eeTy ps i 
penny? ; 
ails > 


ne Fags Sr 







«{¢ * a we 

Atel 
$8 i , 
nes . 
, 


Py eS es 


APPENDIX D 


SUB-PROGRAMS FOR USE WITH 


CHAO AND SEADER DATA 








HTIW Sav AOF @MARDORI~aVE Ft 
ATA ASGAT2 GMA OAHD 
: ) | ‘cu Se 7, | 


C209 9 


Cr Co Gale 


APPENDIX D ANNX 1 


SUBROUTINE PHYS(CPNT) 


CALCULATES PHYSICAL PROPERTIES FOR HYPOTHETICAL COMPONENTS 
IN THE CHAO-SEACER CORRELATION BY CAVETT METHOD 


COMMON NC,yNHC,NCP,P,FR,FL»FV,XF(15) YF (15),ZF(15),ENTH 
COMMON XM(15),YM(15),2M(15),L6(15),X(15,35) ,Y(15,35) 
COMMON XT(15,35),YT(15,35),BBMIX(35) ,AA0B(35),2C0(35) 
COMMON AH(15),8H(15),CH(15),DH(15),EH(15),FH(15) 
COMMON JH2,JC1,JNN2,J02,JCO,JICO2,)JH2S,DDELMX(35) »KDATA 
COMMON TC(15),PC(15),W(15) ,DELTA(15),V1(15) ,A(16,6) 
COMMON EQ(15) 
DIMENSION CPNT(15,2) 
REAL LC 

50 FORMAT( 1X, 7F8.3,11X,2A6) 

51 FORMAT(8F10.8) 
M=NC+1 
DG 20 I=M,NCP 
REACD(5,50) BPCA,BMLA,BPMNA,TCLy»yPCL,API »XXwWM,(CPNT(I,J) 
L,J=1,2) 
READ(5,51) ZM(I),LOCI) 
SPG=141.5/(API+131.5) 
IF(BPMNA.EQ.0.) GO TO l 
GG TO 2 

1 BPMNA=(BPCA+BMLA)/2.0 

2 XRHO=0.98907#SPG 
VLC I) =XXWM/XRHO 
UOPK=( (BPMNA+459.6) ##(1.20/3-20))/SPG 
Perc ie ed.0.) GO TO 3 
GCG TO 4 

3 IF(BMLA.EQ.0.) GO TO 9 
BP=BMLA 
GU TC ‘il 

9 BP=BPMNA 

11 CONTINUE 
TC1=768.07121+(1.7133693-0.10834003E-02#BP )#BP 
TC1=TC1-0.89212579E-02# API #BP+0.38890584E—-O06# BP He #3 
TC1=TC14+( (0.530949 20E-05+0.327116E-O7#API) #API) #BPHH2 

4 TC(I)=TCl 
FPiPcl).£0.0.) GO TQ 5 
GO TO 6 

5 PC1=2.8290406+( «94120109E-03-. 304 74749E-05#BPMNA) #BPMNA 
PC1=PC1-0.20876110E—04#API#BPMNA+0.15184103E-08 #BPMNA# #3 
PC1=PC1+((4+.11047899E-0 7+0.13949619E-O9# API )#API) #BPMNA##2 
PC1=PC1-0.48271599E-O7#API##2*#BPMNA 
PCI=EXP (PC1#2.303) 

6 PC(I)=PCl 
BP=BPMNA+459.6 | 
W(L)=(30/7e)#( (ALOG(PCL/142696) )/2.303)/(TCL/BP-1-0)-1.0 


I xXvWA GC KIGUISGA 












. Pa ye 
(TH9DVeYHO avitTuo 


2TVAMOGMOD JAITTSHTOVYH AUF 231TAS9ORA JADIZYH4 onnceeae 
GOHTIM TTIVAD YS WOITAIZAADD FIGAI2-GAHD ef, 


HTD e (COLA e (SLI AVG CALI AK eV Ae DA AA e @¢99V.9HVeIM WOMMOD i 7 
(2EeeLIVe CE SL IK (SL DOSE LIMSg CEL IMY g COE DMX YOMMGD 2 
(GED IN (REPGOAAS(ZE DKIMGG (AEG eTITYs (2Eee1ITX YOMMOD P hy 7 

COL HA CALI (SLAG e (VLPHIe (SLIME C2LPHA WOMMOD 
ATAGH: (CE VAM IZGD e SSHLe SOIL e GIL SOL e SMLe LIL e SAL VvOMMDD : VF 
(oedT Ae (@LdIVe (2LVATIIGy (AL Voie (CLD IG ¢ (CLIT “OMMDD ‘ou 

ti 


_ 


(e103 WOMMOD 
{Se@L)TU99 WOLenaMIG 
OJ JAIA i 
(OAS eX1L es 89 eXLPTAMAOGT ele 
(8.098) TAMAOT 1200 
et Wem 
GivuyM=I OS OG 
(Le T) TAG) eMWXXe PUA cL IVE LIT AVMGG AIMOyAIGVE (0@,e)0ARH 
(Selebel 
(1)05e (LMS (1ee@)GASH 
(@.1EL+19A\E.L AL =d92 © 
I OT Go (20.903.AVM98)4] © 
$ of 02- 
O.S\(AJME+A998) =AVMG8 J 
I42*#TOCBE.O=0HAX S 
OHSX \MWXX= 6 I rel 4“ 
O92 \{(04€\0. 1 )44 (402 0+ANNGG) 1=NGOU 
€ OT OD ¢(.0.03.19TIAl 


® oT Oa 
e oT Oo (60-03 -A4MOaT co 
AJMa=98 


‘JL OT Do) 

soe rhe 

 -guM ai 

GGs( GaeSO-JEOOPE BOL .0-EC EET. phi Lindricne bs LOT Mes 

£8 #94 #A0-JABAOC BBE .04+98"19A#SO-JeTeAS! 20-497 2 
S*#a48#(19A#(19A#vO-ddl 1TSE 2042-205 COROE O))e1 ot i 

"tote vt 

2 oT oo (20.03.1309 © | 


AVM94# (AUN G 9 #20-3EAT AT ADE .-€0-300 108100. )+8900€: 8. 


” 
r, 
me 




















7 
. 
ty 

Ly 


a 


Yd 
. 
qs 











os ean 


€ #4 AVM96*30-3€0198 12 1 .O-FAUN4G*I VA#A0~30L 101 134138 | 
S*#¥AVMGGe(19Aa( Pitted ote ena ern ef v ve as 
anipnns nna ae §840-199=199 


: i: oy <Page, ‘Ss 


e r | 
a eae) ay i 
¥ 


a 


20 


DEHV= (7.58+4.571#(ALOG(BP })/2.303) *(BPMNA+459.6)/1.8 
DEHV=DERV#((TC1-537.)/(TC1—-( BPMNA+459.6) ) )##0.38 
DELTA( I) =((DEHV-592.4)/V1(I) ) #*#0.5 
CH(1)=XXWM#(3.1073165E—-04—-5, 832381E-O8#APT) 
DH(I)=XXwWM#(9.1745019E-L1#API-5.6334748E-08) 
HB=-.-81862040+ (~-2.8568654E-05+1.7024654E—-O6#API ) *API 
HB=HB-1.4886832E-O8#APIT##3 —3.0836492E-04#U0PK##3 
HB=HB+(8.8395563E—-02+4.2934703E-03#U0PK) #UOPK 
BH(T)=XXWM#HB 
HB=(325442502-(5.2716944E-02-3.5353777E-O04# API) #API) #API 
HB=HB-(8.9530784-3.5118581LE-O1#UOPK) #UOPK##*2 
HB=HB+(43.401618-5.9563889E—-03#API) #UOPK+188.250 
AH(1T)=XXWM#HB 

CONTINUE 

RETURN 

END 
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C APPENDIX D  ANNX 2 
C 
C 
SUBROUTINE KIDL(T) 
CH i Ht HH Ht IDEAL K~RATIOS AS A FUNCTICGN OF TR AND PR ONLY 
COMMON NCyNHC,NCP,P,FR,FL,FV,XF(15),YF (15) »ZF(15) ,ENTH 
COMMON XM(15)59YM(15),2M(15),L0(15)9X(15,35) sV¥(15,35) 
COMMON XT(15935)5YT(15,35) »,BBMIX(35) »AAOBI35),20(35) 
COMMON AH{(15),BH(15),CH(15),0H(15),EH(15) »FH(i5) 
COMMON JH2,JC1LyJIN2,J025 ICO, JCO2,JH2S,DDELMX(35) »KDATA 
COMMON TC(15),PC(15)9W(15),DELTA(15),V1i(15),A(16,6) 
COMMON EQ(15) 
DIMENSTON FN1(20),AKK(20) 
TX=T+459.6 
DC 1 IT=1,NCP 
J=1 
IFTISEQ.IJH2) GO TO 12 
TRETSEQSICIL) GO TO 11 
IF(I.EQ.JN2) GO TO 13 
DEC ISEQSJCG) GO TO il 
BECI.LEQ.J02) GO TO 11 
IF(L.EQ.JCO2) GO TO 14 
IFC I.EQ.JH2S) GO'TO 115 
GC TO 16 
ll J=2 

GO TO 16 
12 J=3 

GO TO 16 
13 J=4 

GO TO 16 
14 J=5 

GO TO 16 
15 J=6 
16 CONTINUE 

TR=TX/TC(1) 

PR=P/PC(T) 

FP1L=A(1,J)+A( 2,5 DELIRIA(3oU Ye TROA G4, d)#TREAZ+A(S, J] @TRe@d 
14+(A(6_J5)4+A( 7,5) #TR+A(S, J) #TRE#2) #PRE(AI9, J) tA(10,5) #TR) 
Lex PR##2-ALOG(PR)/2. 303 

FP2=(A(L1LyJ)FA( L295) #TREAC LI »SI/STREAC 14S, J) #TREEZ4+A(155)) 
1#(PR-0O.6)) 

FNL(I)=(FP14+W(1)#FP2)#2.303 

lL AKK(I)=EXPCFNL(T)) 

DO 99 I=1ly,yNCP 

99 EQ(I)=AKK(T) 
RETURN 
END 
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APPENDIX D ANNX 3 


SUBROUTINE K(T,KENTH,N) 


Cxeexueeeeze CHAO-SEADER K-—-RATIOS 


C 


COMMON NC,yNHC,NCP,P,FRyFL»FV,XF(15),YF(15),Z2F(15),ENTH 
COMMON XM(15),YM(15),ZM(15),L0(15),X(15,35) ,¥(15,35) 
COMMON XT(15,35),YT(15,35) »,BBMIX(35) »AA0B(35) »Z0(35) 
COMMON AH(15),BH(15).CH(15),DH(15),EH(15) »sFH(15) 
COMMON JH2,JC1lyJN2,J02,J5NC0 JCO2, JIJH2ZS,DDELMX(35) »KDATA 
COMMON TC(15),PC(15),W(15) ,DELTA(15),V1(15) ,A(1696) 
COMMON EQ(15) 
DIMENSION FNU(20),ARK(20) »BRK(20) »PHI (20) sGAM(20) »VAPL(20) 
200 FORMAT(1X,40HMORE THAN THIRTY TRIALS ARE REQUIRED FOR, 
Ll4H Z CONVERGENCE) 
TX=T+459.6 
GO TO (191921293), KENTH 
3 DO 101 I=1,NCP 
J=1 
TFECEIEG.JHZ) GO TG 1l2 
IFCT.EQ@.JC1) GO TO 11 
DBI LSEQIIN2):' GO TO 13 
PRELZEQ@LI02)1 GO .TO*L1 
LFCILZEQ.~JCO) GO TO ill 
IFCILEQ.~JCO2) GO TO 14 
LERPSEQSJHZS) GO TO 15 
GO TO 16 
ll J=2 
GO TO 16 
12 J=3 
GO TO 16 
13 J=4 
GO TO 16 
14 J=5 
GO TO 16 
15 J=6 
16 CONTINUE 
ERS TAA TCI ) 
PR=P/PC(1) 
FPG=A(1,JS)FA(2,J)/TREA( 39S) #TREA(4 J) #TREEZ+A(5, J) HT REED 
Lt (Al 69S) 4A( Te J) #TREA(By J) *#TRE¥2Z)EPRE(A(9e J) FAI1LO,I)#TR) 
L#PR##2—-ALOG(PR)/2. 303 
FPI=(A(LL,J)+ACL2, I) #TREAC LZ »JI/TREA( 14S, J) #TREESZ4A(155 5) 
l*(PR-0O.6)) 
LOL FNU(I)=(FPO+W( 1) *#FPI)#2.303 
1 AMIX=0. 
BMIX=0.0 
DO 102 [=l,NCP 
TR=TX/TC(I) 
ARK(1)=(0.4278/(PC( I) #TR#2.5))##025 
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BRK(IT)=0.0867/(PC(1)#TR) 
BMIX=BMIX+BRK(IT)#YT(IyN) 

102 AMIX=AMIX+ARK( I) #YT(IsN) 
AOB=AMIX#AMIX/BMIX 
CCN1=2.0 
CON2=BMIX#P+0.001 
DO 106 KK=1,30 
ZAS=(CONL+CON2)/2.0 
H=BMIX#P/ZAS 
Z=1.0/( 1.0-H)-AODB#¥(H/(1.0+4H)) 
DEL=Z-ZAS 
IF(ABS(DEL).LE.~1-0E-04) GO TO 107 
[F(DEL.~LT.0.0) GO TO 104 
IF(DEL.GT.O.) GO TO 105 

104 CONIL=ZAS 
GO TO 106 

105 CON2=ZAS 

106 CONTINUE 
WRITE(6,200) 

L107 AADB{N)=A0B 
BBMIX(N)=BMIX 
ZC(N)=2Z 
IF(KENTH.LT.3) GO TO 4 
DO 108 [=1,NCP 

108 PHI(I)=(Z-1.0)#(BRK(1I)/BMIX)—-ALOG (Z-BMIX#P)—-AOB*( (2.0 
LARK( 1) )/AMIX-(BRK(T)/BMIX) )#ALOG(1.0+H) 

2 CON1=0. 

CON2=0.0 
DG 109 [=1l,NCP 
DELMX=XT(I,N)#VL(T) 
CON1L=CONL+DELMX 

109 CON2=CON2+DELMX#DELTA(1) 
DELMX=CON2/CONL 
DDELMX (N)=DELMX 
IF(KENTH.LT-5) GO TO 4 
CON1=1.987#TX/1.8 
DO 110 [=1,NCP 
GAM(I)=V1(1)#(DELTA(1I)-DELMX )##2/CON1 
VAPL( I )=(FNU(I)+GAM(I)—-PHI(1)) 

L110 EQ(I)=EXP(VAPL(I)) 

4 RETURN 

END 
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APPENDIX D ANNX 4 


SUBROUTINE BUBPT(T,B,N) 


THIS SUBPROGRAM CALCULATES THE BUBBLE POINT FOR THE CHAO AND 
SEADER DATA SET 


100 
105 


COMMON NC yNHC,NCP,P,FR,FL,FV,XF(15),YF(15),ZF(15) »ENTH 
COMMON XM(15)9YM(15),Z2M(15),L0(15)5X(15,35),Y(15935) 
COMMON XT(15,35),YT(15,35) ,BBMIX(35) »AA0B(35),2Z0(35) 
COMMON AH(15),BH(15),CH(15),DH(15),EH(15) »FH(15) 
COMMON JH2,JC1L,JN2,J02,JSCO,JCO2,JH2S,D0DELMX(35) »KDATA 
COMMON TC(15)_,PC(15),W(15) »,DELTA(15) 9V1(15) sA(1656) 
COMMON EQ(15) 
DIMENSION B(15,35) 

FORMAT (1X,38HBUBPT MORE THAN THIRTY TRIALS REQUIRED) 
FORMAT (LX, 3HSY=,E15.8) 
BPTV=.0001 

TT=T 
K1l=1 
CALL KIDL(TT) 
DC 5 I=1,NCP 

XT(I,N)=BCUI,N) 

YT(I»N)=EQ( 1) *XT(I,N) 
CONTINUE 
KENTH=5 
SY=0. 
CALL K(TT,KENTH,N) 
O=0. 
DO 2 I=1,NCP 
YY=XT(I,N) #EQ(1) 

PRCADS(Y7 (14N)—-YY).LT.BPTV) GO TO 4 
O=1. 
YT(I»sN)=YY 
SY=SY+YY 

IF(ABS(SY-1L.~)-GT.BPTV) GO TO 6 

IF(O.LE.BPTV) GO TO 10 

DO 3 I=1l,NCP 
YT(IsN)=YTCUIsN)/SY 
K1=Ki+l 

IF(KL.GT.~30) GO TO 9 
Q=TT#(1.0+(1.0-SY)/5.0) 

IF(ABS(Q-TT).LT.~30.) GO TO 8 

IF((SY-1.0)-GE.0-) GO TO 7 

TT=TT+30. 
S010 °1 
TT=TT-30. 

GO TO l 

TT=Q 
C] Oia 0 ae | 

WRITE( 6,100) 
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‘C THIS SUBPROGRAM CALCULATES THE DEWPOINT FOR THE CHAO AND 
Cc SEADER DATA SET 


COMMON NC NHC NCP oP FR, EL pe PV e KEOCLS) + YF ELS)» ZFCL5) eENTH 
COMPON XMPCLSD Ae YMULS De ZM( LSD eLOLIS De A156. 35) 6¥U15,353 
COMMON KT(15_35)-71615,35),BOMIX0395) -AA05135),70(35) 
COMMON ANCES), 6H(15),CH( 15) ,0N( TS) -EHCLS) ,FNOLS) 
COMMON Jh2,5C1oJN2 9302, JCOeITO2, JHZ5+DDELMX135) _eKDATA 
COMMON TC1LS)sPCILS) W115) pDEL TALIS) eVL(15) ,AUL6_6) 
COMMON £01415) , 
; DIMENSION 8¢15,35) 
)3G0 FORMATILX,S8KCEWPT MORE THAN THIRTY TRIALS REQUIRED) 
105 FORMAT(1X + 3H#SK=E15.8) 
: OPTV=.00)1 
TYts-T oe 2 
Ki=1 
CALL KIOLITT) 
00 5 1=1,NCP 
YTCI ,NI=B(I,N) 
BS RVCIgNI=VTCINI/EQTI) 
KENTH5 
1 S$xX=C. 
my CALL KUTT ,KENTH.NI 
H G=0. 
BDO 2 I=ilsNCP 
AASVTCigNI EQUI) 
Beeees RTT sN}-XX? «LT-DPTYI GO TO 4 


Oel. 
—  & KTCEgNP=AX 
2 SK#SK*XK , 
. PECABS(SK-1.).GT.DP TV) GO TO é 


SEUO.LT.OPTV) GO TU Lo 
-6 po 3 T=isNCP 
B MTCL sNDHXT(1+NI/S* 
KL=Ki+l 
PFC(K1.GT.30!) Go To 9 
@stte (1.0+(SX-1.0)/5.0) 
TFLABS(O4TT).L 1.30.) GO TO 8 
TEU(S¥-1.0).GE.0.) GO To 7 
To 1 
eeae7430. 
TO 1 
| oe 
60 1 1 


LITE(6,100) 
RITE (6105) 3x 






















Pate rea 


aa 
fora scaghd eandnanes 
ay “1 aeP tae ® 


. alae neat 7 bins 
7 ‘ee v¥ Fe aaRA,. ‘ a 218 49 ria ad 
' s4 + ia, Tee ipe zh, 
i Lag. ( Ceme ) “<@€GL 4007 way: 


7 cae et. «fees, PR ee oi 
Nh Se ied Oh Sa Ae 
oie) ek (ee 

iM CE ERS al 
~~ es 138 we 
iis rr ret; 


S i! “ine 
co Fi 


ev" a avec " 

A we (Sto ee 

(Wet Ret RG ' 
[)ipee oT ey ty 
: St er 
4 nani 


ce 


crs. * wiiee 
i eT mn, oe 


, r 
rat lie 
” en 


“ne abt 
(Get ive 





CF ONO? 


CI.68-6) Gy 


APPENDIX D ANNX 5 


SUBROUTINE DEWPT(T,B,N) 


THIS SUBPROGRAM CALCULATES THE DEWPCINT FOR THE CHAO AND 
SEADER DATA SET 


100 
105 


COMMON NCyNHCyNCP»PyFR,yFL FV, XF(15)sYF(15),ZF(15) ,ENTH 
COMMON XM(15)5,YM(15).Z2M(15),L0(15).X(15935) > Y(15,35) 
COMMON XT(15535),YT(15,35) ,BBMIX(35) ,AA0B(35),2C0(35) 
COMMON AH(15),BH(15),CH(15),DH(15),EH(15) ,FH(15) 
COMMON JH2,J5C1,JN2,J023JC0,ICO2,JH2S,DDELMX(35) »sKDATA 
COMMON TC(15),PC(15),9W(15),DELTA(15),V1(15),A(1696) 
COMMON EQ(15) 
DIMENSION 8(15,35) 
FORMAT(1X,38HDEWPT MORE THAN THIRTY TRIALS REQUIRED) 
FORMAT( 1X, 3HSX=,E15.8) 
DPTV=.001 
TT=T 
K1l=l 
CALL KIOL ETT) 
DO 5 IT=1l,yNCP 
YT(I,N)=B(1I,N) 
XT(I,NI=YT( I ysN)/EQ(1) 
KENTH=5 
SX=0. 
CALL K(TT,KENTH,N) 
C=0. 
DO 2 I[=l,NCP 
XX=YT(IyN)I/EQ(T1) 
IF(ABS(XT(IN)—-XX)-LT.DPTV) GO TO 4 
O=1. 
XT(I9N)=XX 
SX=SX+XX 
ITF(ABS(SX-1.).GTe-DPTV) GO TO 6 
IF(O.-LT~OPTV) GO TO 10 
DG 3 I=l,NCP 
XT(I»>N)=XT(I9N)/SX 
K1l=K1+1 
IF(K1L.GT.30) GO TO 9 
Q=TT* (1.0+(SX-1.0)/5.0) 
IF (ABS(Q-TT)-LT-30.) GO TO 8 
IF{(SX-1.0).GE.0.) GO TO 7 
TT=TT-30. 
GO TO l 
TT=TT+30. 
60 Ta 1 
TT=Q 
GO TO l 
WRITE( 6,100) 
WRITE(6,105) SX 
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edo ReTT ) APPENDIX O ANNK 6 
— RETURN . 
END 


ve SuBROUT INE FLASH FT ym) 


Ce ee THIS SUB PROGRAM CARRIES OUT FLASH CALCULATIONS FOR THE 
CHAO — SEADER DATA SET 


cowMGn NOGNHC NCP ePeFRy FL PPV e XELES) oVE CLS) ZPC15) ¢ENTH 
COMMON XNCLSDFYM(D5S) ZK CISD SLOCLS DX O15. 35) + ¥015,35) 
COMMON KTCL5,35)6VTELS, 35> ¢BBMIX135) ,A4081(351,70135) 
COMMON AHCI LST ,BHELSISCHULS) eORPLS),EHEDS) »FHULS) 
COMMON JHZ6 ICL, INZ;s J02, ICO ICOZSIHZS -ODELMXL 39) eKDATA 
COMMON ICULS Is PG USSF eN CLS 1 eRe Peer Pehl TES) eA tees 6) 
COMMON ECI 15) 
KFL=0 - 
G-l. 
GG=0. = 
VVe.00!1 j 
6$l=0. 
6$=0. 
PRUKFESLT.1L) GO ol 
CALL KET YKENTH,N 
DOL tel,NcP 
ZFt#ZF it) 
GKF@1.-1./EQIT) 
GeZFPisih.-QeGKF) 
GS=GS+tsG 
GLl=ZFl eGKFE/ (i 1.-QeGKF) «e2) 
GSl=6S$itol 
6S$=GS-1. 
GG=GS 
, 0F0-65/G651 
KFL=1 
FL=aQerR 
FVSFR-FL 
DO 4 L=t,NCP 
MECTVSZECT POFR/(FVSEQ( I) FL) 
VFCT<GQlbiexFtls 
MBC LVEKF CL ere 
YR (TIsVYF(Lliefy 
RVCLeNPeKEC I) 
> ~YTtteNPsVFCL) 
. 4 CONTINUE 
“ay PPUABSI(GS-GG).LT.v¥) GU FO 2 
TO 3 
Gt «routr) 
Bid 6 
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=> 
a 
ve 
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SUBROUTINE FLASH (T,N) 


THIS SUBPROGRAM CARRTES OUT FLASH CALCULATIONS FOR THE 
CHAO AND SEADER DATA SET 


COMMON NCyNHCyNCP,P,FRyeFLZFVyXF(1L5) »YF(15),ZF(15),ENTH 
COMMON XM(15)5Y¥M(15)9Z2M(15),L0(15)5X(15y35),Y(15,35) 
COMMON XT(15,35)9YT(15,)35),88MIX(35) ,AA0B (35) ,Z0(35) 
COMMON AH(15),8H(15),CH(15),DH(15),EH(15) »FH(15) 
CUMMON JH2_,JC1,JN2,J02,JSCO0,JCO2,J5H2S,0DELMX(35) »KDATA 
COMMON TC(15),PC(15)9W(15) sDELTA(15) 5V1(15) »A(16,6) 
COMMON EQ(15) 
KFL=0 
Q=1. 
GG=0. 
VV=.001 
3 GS1=0. 
GS=0. 
IF(KFL.~LT.21L) GO TO 5 
CALL K(T,KENTH,N) 
6 DO 1 T=1,NCP 
ZFI=ZF(T) 
GKF=1.-1./EQ(T) 
G=ZF1/(1.-Q*GKF) 
GS=GS+tG 
G1l=ZFI#*#GKF/((1.-Q#GKF) ##2) 
1 GS$1=GS1+G61 
GS=GS-1L. 
GG=GS 
Q=Q-GS/G51 
KFL=1 
FL=Q#FR 
FY=FR-FL 
DO 4 IT=l,NCP 
XF(I)=ZFCL)*FR/(FVEQ( IT) +FL) 
YF(I)=EQ(1)#XF(T) 
XM(IT)=XFCT)#FL 
YM(T)=YF(LD)#FV 
XT(L»N)=XFCUT) 
YT(I,NI=YFUT) 
4 CONTINUE 
IF(ABS(GS-GG).LT.VV) GO TO 2 
GO TO 3 
5 CALL KIDL(T) 
GG TO 6 
2 RETURN 
END 
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C APPENDIX D ANNX 7 
he 
€ 
SUBROUTINE ENTHAL(T,B,KENTH,N) 
G 
(CC x at st 4 af at at CHAC-SEACDER H-VALUES ARE CALCULATED 
C 
COMMON NC,yNHC,NCP,P,FR,FL,FV,XF(15),YF(15),ZF(15),ENTH 
COMMON XM(15),YM(15),2M(15),L0(15) 9X(15,35) ,¥(15,35) 
COMMON XT(15,35),YT(15,35) »sBBMIX(35) sAA0B(35) ,Z0(35) 
COMMON AH(15),BH(15),CH(15),DH(15),EH(15) ,FH(15) 
COMMON JH2,J5JC1yJN2,J02,5 J3JC0,JCO2,5 JH2S ,DDELMX(35) »KDATA 
COMMON 1TC(15),PC(15),W(15) ,DELTA(15),V1(15) ,A(1696) 
COMMON EQ(15) 
DIMENSION HIDL(20) ,YY(20) »XX(20) ,HL( 20) »HAC(20) »HFC(20) 
DIMENSION B(15,35) 
TX=714+459.6 
DO 1 I[=l,NCP ~ 
1 HIDL( 1 )=AH(C1I)4+BR(1)#T4+CH( 1) * T##24+DH( 1) #T #23 
GO TO (5559232),KENTH 
5 SUMHV=0. 
DO 3 I=1,NCP 
YT(I»,N)=B(1,N) 
3 SUMHV=SUMHV4+YT( IN) #HIDL(1) 
CALL K(T;,KENTH,N) 
H=BBMIX(N)#P/ZCI{N) 
HVC=(1.5#AA0OB(N) #ALOG(12+H)+1.20—-ZC(N))#1.987#TX 
ENTH=SUMHV-HVC 
S010. 7 
2 SUMHL=0. 
DO 6 [=l,NCP 
XT(I,N)=BCUI,N) 
6 CONTINUE 
CALL K(T,KENTHgN) 
DO 4 I=l,NCP 
J=1 
IF(I.EQ.JH2) GO TO 1l2 
IF(1.EQ.JC1) GO TO 11 
[F(I.-EQ-JN2) GO TO 13 
FFCIZEQ.J02) GO TO 11 
IF{I.EQ.JCO) GO TO ll 
IF(I-EQ-JCO2) GO TO 14 
IF(IeEQe-JH2S) GO TO 15 
GO TO 16 
ll J=2 
GG TO 16 
l2 J=3 
GO TO 16 
13 J=4 
GO TO 16 
14 J=5 
GO TO 16 
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15 J=6 

16 CONTINUE 
TR=TX/TC(I) 
PR=P/PCI{I) 
CONL=—-Al2,JSI/STRE#¥24A(3, 5) 42.08 A(4, J) #TREZ-ORA(S, J) #TR 
L##2+(A(7,J)+2.0#A(8,J)#TR)#PREA(1LO,J) #PRe*¥24+(A(12,J5)—- 
LA(13,J)/TRe*24+3.08#A(14,J5)#TR#*¥2) #W(1) 
CONL=CON1L#2.30259/TC(I) 
HFC(1I)=CON1 
HAC( I )=-((V1(1)#(DELTA(I)—-DDELMX(N) )¥#2)/(1.987#(TX##2 
1)})#1.8 
HL( I )=—-(HFC( 1) +HAC(1I))*#1.987#TX##2+HIDL( 1) 

4 SUMHL=SUMHL4+XT(1IsN)#HL( 1) 
ENTH=SUMHL 

7 CONTINUE 
RETURN 
END 
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APPENDIX E ANNX 1 


SUBROUTINE K(T,KENTH,N) 


THIS SUBPROGRAM CALCULATES K RATIOS FROM POLYNOMIAL DATA 


COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 


NC »NHC,NCP,P,FR,FL,FVsXF(15) ,YF(15) yZF(15),ENTH 
XM(15)5YM015)52M(15),L0015),X(15,35),Y(15935) 
X7(15935)eYT(15,35) »,BBMIX(35) »AA0B(35) »Z20(35) 
AH(15),8H(15),CH(15),0H(15),EH(15),FH(1L5) 
JH2,J5C1yJIN2,J02,JC0,J5C02,JH2S,DDELMX(35) »KDATA 
TC(15)5PC(L5),W(15) ELTA(15),V1(15) »A(1696) 
EQ(15) 


TT=T+459.6 


DO 1 I= 


1,NCP 


EQT=(A(T,1LI+A0CT 22) 8TT+A(T, 3) #(TT##2)4+A(1 4) (TT #83) ) eH3 
1 EQ(I)J=EQT#TT 


RETURN 
END 
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SUBROUT 


THIS SUBPR 
POLYNOMILA 


COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
DIMENSI 
BPTV=.0 
KT=1 
TT=T 

1 SY=0. 
KENTH=0 
CALL K( 
DO 2 I= 


APPENDIX E ANNX 2 


INE BUBPT(T,ByN) 


OGRAM CALCULATES THE BUBBLE POINT FOR THE 
DATA SET 


NC,NHC,NCPyP,FRyFL,FVeXF(15),YF(15),2F(15),ENTH 
XM(15)5¥M(15)9Z2M(15),LO(15)9X(15,35),Y(15,35) 
XT(15935)5YT(15,35) ,BBMIX(35) ,AA0B(35),20(35) 
AH(15),BH(15),CH(15),DH(15),EH(15) »FH(15) 
JH2,J5C1,JN2,J02,J5C0,JCO02,JH2SyDDELMX(35) ,KDATA 
TC(15),PC(15) »W(15) DELTA 15) VIC 15) sA(16%6) 
EQ(15) 

ON B( 15,35) 

Ol 


TT» KENTH,N) 
ly»NCP 


XT(I,N)=BC1,N) 


2 SY=SY+X 
SQ=1.0- 
TF (ABS ( 
KT=KT-1 
IF(KT.«L 
SYO=SY 
TO =TT 
TT=TT-4 
60 10 1 

3 SLOPE=( 
ToSTT 
TT=(SQ/ 
SYO=SY 
GO To 1 

4° 7577 
RETURN 
END 


T(T,N) #EQ(1) 
ay 
SO}.L1T.BPIV) GUO TO 4 


T.0) GO TO 3 


OO. 
SY-S¥0)/(TT-70) 


SLOPEI+TT 
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APPENDIX E ANNX 3 


SUBROUTINE ENTHAL(T,B,KH,J) 


THIS SUBPROGRAM CALCULATES ENTHALPIES FROM POLYNOMIAL DATA 


COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 


NC »yNHCeNCP,PsFReFLyFVyXF(15) » YF (15) ,ZF(15) sENTH 
XM(15)9Y¥M(15),Z2M(15),L0(15),X(15,35),Y(15,35) 
XT(15,35),YT(15,35) ,BBMIX(35) ,AADB(35) ,20(35) 
AH(15),BH(15),CH(15),0H(15),EH(15),FH(15) 
JH29J5C15JIN2,J02,5J5COeJCO2,JH2S ,DDELMX(35) »KDATA 
TC(15),PC(15) ,W( 15) ,DELTA(15),V1(15),A(16,6) 
EQ(15) 


DIMENSION B( 15,735) 


ENTH=0. 


TT=1T+459.6 
GO TO(1,1,2,2),KH 
2 PU. 3 1>1,NCP 
H=(AH(T)+BHOT)*#TT+CH(L)#(TT#¥#2) )¥#2 
3 ENTH=ENTH+H#B( 1, J) 


RETURN 


1 DO 4 I= 


L,NCP 


H=(DH(T)+EHC IT) # TT+FHCL )¥(TT##2) )¥ #2 
4 ENTH=ENTH+H#B( 1, J) 


RETURN 
END 
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APPENDIX F 


PROBLEM STATEMENTS AND RESULTS 


FOR EXAMPLE PROBLEMS 
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Appendix F Annex l 


PROBLEM NO. 1 
PROBLEM STATEMENT 


Si = ee 








ABSORBER 
BUBBLE POINT METHOD 


“Aw COLUMN DATA 




















PRESSURE (PSIA) | NUMBER OF PLATES 
y 300.0 8 
___THETA CONVERGENCE TOLERANCE = 0.0010 
PRODUCT STREAM CONVERGENCE TOLERANCE = 0.0850 


~ TEMPERATURE WEIGHTING FACTOR = 0.250 





Be FEED DATA 


























TEMPERATURE (DEG F) CONDITION 
FEED NOT SPECIFIED SATURATED VAPOUR 
ABSORBER OIL bee 90.0 eee SUB-COCLEDSLIQUID 

ee pom sae FEED. | ABSORBER OIL 

COMPONENTS LB MOLES MOLE LB MOLES MOLE 
PER U.T. FRACTION PER U.T. FRACTION 
METHANE 702000.) 20.7000 0.000 0.0000 
ETHANE 15.000 0.1500 0.000 0.0000 
PROPANE 10.000 0.1000 0.000 0.0000 
fi. N-BUTANE 4.000 0.0400 0.000 0.0000 seeaerae 
ee N=PENTANE. 1.000 0.0100 0.000 0.0000 
N-OCTANE 0.000 0.0000 20.000 1.0000 
SPECIFIED TOP PRODUCT RATE = 85.000 LB MOLES/U.T. 
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Cw. ENTHALPY DATA 





YEN AND ALEXANDER CORRELATION USED _ 


arene 1Agthanmnnmnet 4 Aan 


De. EQUILIBRIUM RATIO DATA 








NGAA POLYNOMIAL DATA AT CONVERGENCE PRESSURE = 3000. PSIA 


Es INITIAL ASSUMPTIONS 











PUAT BAVARTABLES? + | 








PLATE NO. TEMPERATURE VAPOUR RATE LIQUID RATE 
Ha (DEG F) a (LB MOLES) (LB MOLES) 
(PER U.T.) (PER U.T.) 

1 100.00 85.00 25200 

. 2 100.00 90.00 25.00 

3 100.00 90.00 25.00 

4 100.00 90.00 25.00 

ae ee 100.00 “8 90.00 25.00 

6 100.00 90.00 25.00 

7 100.00 90.00 30.00 

8 100.00 95.00 35.00 
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PROBLEM NO. 1 
BUBBLE POINT METHOD 








~ PRODUCT STREAMS © 























Oe 2 ae Se DRY GAS RICH OIL 
COMPONENTS (LB MOLES) (LB MOLES) 
(PER U.T.) (PER U.T.) 
METHANE 67.671 2.329 
ETHANE 12.615 2.385 
PROPANE 4.663 5.337 
af) N~BUTANE pe 0.007 3.993 
N-PENTANE 0.000 1.000 
N-OCTANE 0.048 19.952 
TOTAL RATES 85.004 Bane 34.996 
PPEMrT RAT inte 5 PLATE VARIABLES 
Poa? PLATE NO. TEMPERATURE ~~ VAPQUR RATE LIQUID RATE 
(DEG F) (LB MOLES) (LB MOLES) 
ats (PER U.T.) (PER U.T.). 
1 35.25 85.00 34.42 
2 61.64 99.42 Beet 
: x£¥S Tae 24 ty LO2e27 38.21 
: 4 (Belt POss21 38.32 
5 83.58 103.32 37.97 
6 STURT! 102.97 37.34 
7 100.94 102.34 36-60 
8 114.92 101.60 35.00 


~ CALCULATED FEED TEMPERATURE = 133.9 


THETA = 1.000836 





NUMBER OF ITERATIONS 18 
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Bee oe ae NO. 1 


ROBLEM STATEMENT 
BUBBLE POINT METHOD 

















ABSORBER 
A. COLUMN DATA 
See PRESSURE (PSIA) ~~~ ‘NUMBER OF PLATES 
4 300.0 8 
THETA CONVERGENCE TOLERANCE = 0.0010 
PRODUCT STREAM CONVERGENCE TOLERANCE = 0.0850 


TEMPERATURE WEIGHTING FACTOR =.0.250 


Bi cdeenaatnuinn peptdahener) mts 








Be FEED DATA 























Me SE TEMPERATURE (DEG F) CONDITION ee 
FEED NOT SPECIFIED SATURATED VAPOUR 
ABSORBER OIL 90.0 SUB-COOLED LIQUID 

FEED ABSORBER OIL 
COMPONENTS — LB MOLES MOLE LB MOLES MOLE 
PER U.T. FRACTIUN PER U.T. FRACTION 
METHANE © 70.000 0.7000 0.000 0.0000 
ETHANE _ 15.000 0. 1 500mm 0.000 0.0000 
PROPANE 10.000 0.1000 0.000 0.0000 
N-BUTANE 4.000 0.0400 0.000 0.0000 
N=PENTANE __ 1.000 0.0100 0.000 0.0000 
- N-OCTANE 0.000 0.0000 20.000 1.0000 
SPECIFIED TOP PRODUCT RATE = 852000 LB MOLES/U.T. 
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Ce. ENTHALPY DATA 











~--—s CHAQ=SEADER CORRELATION USED | 


ates BAAN enh hab ana tenreeneane 


De EQUILIBRIUM RATIO DATA 








CHAO-SEADER CORRELATION USED 




















E. INITIAL ASSUMPTIONS 
PLATE VARIABLES 
PLATE NO. TEMPERATURE VAPOUR RATE LIQUID RATE 
ee ei (DEG FF) | Sete MOLES) (EBMMOLES ) ogee 

(PER U.Te) (PER U.sTe) 

1 100.00 85.00 25.200 

2 100.00 Poa 90s 00c 25.00 

3 100.00 90.00 25.00 

4 100.00 90.00 25200 

a 5 100.00 ae 90.00 | 25.00. 

6 100.00 G00 Omak 25.00 

7 "100.00 90.00 30.00 

8 100.00 95.00 35.00 








~ oad versa 
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PROBLEM NO. 1 
BUBBLE POINT METHOD 























THETA = 1.000169 





NUMBER OF ITERATIONS = 16 





moeeDRY GAS RICH OIL 
mee COMPONENTS ~~ (LB MOLES) (LB MOLES) 
(PER Us bad (PER U.T.) 

- METHANE Oil? 2.868 
ETHANE | aeel 2.257 ee = 2.743 
PROPANE 4.996 5.004 
N-BUTANE Cea 3.789 

_N-PENTANE _ 0.000 1.000 
N-OCTANE 0.406 i 19.594 
TOTAL RATES : 85.00 2a Caen. 34.998 
PLATE VARIABLES 
“PLATE NO. = TEMPERATURE ._—‘ VAPOUR RATE LIQUID RATE 
(DEG F) (LB MOLES) (LB MOLES) 
(PER U.T.) (PER U.eTe) 
l 116.45 85.00 25247 
2 120.87 90.47 26.15 
3 121.50 91.15 26645 
A Es ae E20.33 en 91.45 Ba 26074 @ 
5 117047 91.74 P1215 
6 112.37 92.13 3 27.81 
7 103506208 92.81. = 29.230 
8 85.79 94.30 35.00 
CALCULATED FEED TEMPERATURE = 38.3 
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PROBLEM NO. A 


PROBLEM STATEMENT 








= BUSBIE—POINT METHOD 
ABSORBER 


As COLUMN DATA 









































PRESSURE (PSIA) NUMBER OF PLATES 
300.0 3 
THETA CONVERGENCE TOLERANCE = 0.0010 
PRODUCT STREAM CONVERGENCE TOLERANCE = 0.0850 
TEMPERATURE WEIGHTING FACTOR = 0.250 
RB. FEED DATA 
TEMPERATURE (DEG F) CONDITION 
_ *-FEED NOT SPECIFIED SATURATED VAPOUR 
__ ABSORBER OIL 90.0 ___SUB-CUULED LIQUID 
FEED ABSORBER OIL 
CUMPUNENTS LB MOLES MOLE LB MOLES MOLE 
PER U.T. FRACTION PER U.eT. FRACTION 
oN METHANE _ 70.009 047000 U-000 049090 
ETHANE 15.000 0.1500 0.000 0.0000 
PRUPANE 10.000 0.1000 0.000 O'..0000 
N- BUTANE 4.000 0.0400 0.000 0.9000 
N-PENTANE 1.000 0.0100 0.000 0.0900 
N-OCTANE 0.000 0.0000 20.000 1.0000 
SPECIFIED TOP PRODUCT RATE = 85.000 LB MOLES/U.T. 
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C. ENTHALPY DATA 


POLYNOMIAL DATA USED 


D. EQUILIBRIUM RATIO DATA 


POLYNOMIAL DATA USED 


E. INITIAL ASSUMPTIONS 


PLATE VARTABLES 


PLATE NO. TEMPERATURE VAPOUR RATE LIQUID RATE 

(DEG F? (LB MOLES) (LB MOLES) 

(PERVOU.TS) CPERVYUST.) 
i 100.00 85.00 25-00 
2 100.00 90.00 25200 
3 100.00 90.00 25.00 
4 100.00 90.00 25-00 
5 100.00 90.00 25200 
6 100.00 90.00 25.00 
7 100.00 90.00 30.00 
8 100.00 95.00 35-00 
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PROBLEM 





NU. L 
BUBBLE POINT METHOD 


PRODUCT STREAMS 














DRY GAS RICH OIL 
COMPUNENTS (LB MOLES) (LB MOLES) 
Creer ks Tt) (PER “UlT.4 
METHANE = bile OD etwas ee 2.049 
ETHANE eee oT ie 
PROPANE 4.509 5.491 
N-BUTANE 0.083 oye lg 
N-PENTANE 0.000 1.000 ; 
N-OCTANE Ore epee 
TOTAL RATES 85.000 35.000 


PLATE, VARTLARUES 











RATE 


LIQUID RATE 
(LB MOLES) 
CRE Rus ta) 





24.83 
A Ag 3 
25.80 

(126.02 
26.30 
25-83 





PLATE NO. TEMPERATURE VAPOUR 
(DEG F) (LB MOLES) 
: ee ae I Re 
1 P07 676 85.00 
2 Die 69.683 
3 112.68 90.52 
4 mT 2.34 90.80 
5 110.46 91.02 
6 i el O60 9 ck a SO 
7 Obert 91.83 
8 ee 93.17 
CALCULATED FEED TEMPERATURE = <-7.0 


(Ds cal ell oe eee Be Re 





NUMBER UP TITERATIONS = 34 
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Appendix F. Annex 2 


PROBLEM NO. 1 
PROBLEM STATEMENT 


Pee see SUM RATES METHOD. 








ABSORBER 
As COLUMN DATA 
PRESSURE (PSIA) NUMBER OF PLATES 
300.0 ot i 
PRODUCT STREAM CONVERGENCE TOLERANCE = 0.20850 


TEMPERATURE WEIGHTING FACTOR = 1.000 


Pane pente ents Sere COEMELED nee? sive Laat TL See stents neeeree? eT Cebent lees Tal Toes 


B. FEED DATA 





TEMPERATURE (DEG F) CONDITION 
Meee rrep fo 38.0 i SATURATED VAPOUR | 
“ABSORBER OIL 90.0 SUB-COULED LIQUID 
FEED ABSORBER OIL 
COMPONENTS LB MOLES MOLE LB MOLES MOLE 
Be eee ee PER U.T. FRACTION == “PER U.T. FRACTION 
METHANE 3704000 0.7000 0.000 0.0000 
ETHANE 15.000 0.1500 0.000 0.0000 
PROPANE 10.000 0.1000 0.000 0.0000 
N-BUTANE 4.000 0.0400 0.000 0.0000 
N-PENTANE 1.000 0.0100 : 0.000 0.0000 
oy OCTANE Ge 20.000 | 40.0000 2% 20.000 1.0000 


SPECIFIED TOP PRODUCT RATE = 85.000 LB MOLES/U.T. 
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Ge ENTHALPY DATA 


| CHAO-SEADER CORRELATION USED 


De. EQUILIBRIUM RATIO DATA 
CHAO-SEADER CORRELATION USED 
Es INITIAL ASSUMPTIONS 
PLATE VARIABLES 
PLATE NO. TEMPERATURE VAPOUR RATE LIQUID RATE 
ee ee ee DEG Ff) oe ILE MOLES) (LB MOLES) oe 
(PER U.T.) (PER “UeTs) 
L 114.75 83.82 25.31 
2 Lis. 25 Boel 25.95 
3 (lose 89.77 26226 
4 116.41 90.07 26.54 
6 106.91 90.75 27264 
7! 96.65 91.46 29621 
8 76.64 93.09 36.18 
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PROBLEM NU. 1 


SUM RATES METHOD 
PRODUCT STREAMS 





COMPONENTS CLOBMULES) (LB MOLES) 
UPERU ota) ce Ee elie) 
METHANE ond Ord COR 22393 
ETHANE 12.239 2.61] 
PROPANE 4.975 52025 
ee N-BUTANE so Gs 205 mee phe 3.791 Mace SS 
N-PENTANE 0.000 1.000 
OCTANE 0.411 19.589 
TOTAL RATES 84.942 35.058 
be PLATE VARIABLES a tet | ef 
PLATE NO. TEMPERATURE VAPOUR RATE LIQUID RATE 
COE ter) (LB MOLES) (LB MOLES) 
LBER CU s Je) (PERU. tre) : 
l r17.16 84.94 25D ec 
2 Paieio9 90.46 26.21 
Rice er 3 il 22:¢2 1. ome $1.15 4 ee 26.53 
4 120.9f 91-47 26.81 
5 118.06 91.75 2s20 
6 LiZz.85 G$2.214 27286 
7 103.83 92.80 29235 
8 86.18 94.30 35.06 


NUMBER OF ITERATIONS = 8 


a i 











PROBLEM NO. 1 
PROBLEM STATEMENT 


—__—__/—_____——---—--- SUM-RATES- METH OD —----—_---_--_- -_--__-_______ 
ABSORBER 


A. COLUMN -DATA 





PRE SUR Cero 1A) NUMBER OF PLATES 
300.0 3) 


PRODUCT STREAM CONVERGENCE TOLERANCE = 0.0850 








TEMPERATURE WEIGHTING FACTOR = 1.000 


i 


eee eee UALA 








TEMPERATURE (DEG. F} CONDITION 





Seew ~8.2 SATURATED VAPOUR 
ABSORBER OIL 90.0 SUB~CODLED’ LIQUID 
; PEEL ABSORBER OIL 
COMPONENTS CPB oMOCES MOLE iB MOLES MOLE 
Pee Us eltess CRAG) LON PiEROAS oli e FRACTION 
METHANE TACT aLele O. (000 sud 0.0000 
ETHANE £5 ..000 Oe bow 0.000 0.0000 
Meme PROPANE S = 10.000 0.1000 Bee 0-000 egos 0000 eae 
N-BUTANE 4-000 0.0400 Gs000 0.0000 
N-PENTANE ten 1028, 0.0100 0.000 6b. OUD 
N-OCTANE 0.000 0.0000 2.000 1.0000 


Peon eure SOUUCINRATE = 7085 .000 LE MOLES/U.J<- 
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C. ENTHALPY DATA 


POLYNOMIAL DATA USED 


D. EQUILIBRIUM RATIO DATA 


POLYNOMIAL DATA USED 


Ee INITIAL ASSUMPTIONS 


PLATE VARTABLES 


PLATE NOQ. TEMPERATURE VAPOUR RATE LIQUID RATE 

(DEGLE I (LB MOLES) (LB MOLES) 

(PER U.T.) (PER “U.T.3 
1 L00.00 85.00 25.00 
2 100.00 90.00 25.200 
e. 100.00 90.00 25200 
4 100.00 90.00 25.00 
5 100.00 90.00 25.00 
6 100.00 90.00 25.00 
q 100.00 90.00 30.00 
8 100.00 95.200 35.00 


JTAR GIUOLS 
(2340M 6.) 
(.T.U 839) 

00.25 
00.28 
O0.és 
00.2S 
00.2 
00.¢S 
o0.U€ 
00.2€ 


















Becks 5 
ATAG OITAK M Ld. ie 3 


| esau ata 000 
“ ; iy fics 


_gvorvanvees Pr ve | 
hen! 
2318AIAAV 3TAIG : an 
3TAS SUGSAV 3AUTARSIMAT a 
(2430M 84) * 43 030) aad 
(.7.U 839) | a 
00.é8 00.001 we 8 al : 
00.0e 00.001 Ee 
00.0e 00.00L. 
00.00 00.001 
00.0¢ 00.00i @ 
00.09 00.001 (le al 
00.0¢ 00.001 = 
00.¢e 00.004 












PROStCEM NOW I 
SUM RATES METHOD 





PRODUCT STREAMS 

















URY GAS ORE shese anh 

COMPONENTS (EB MOLES) {boreal © lets oe) 

Meee the bel LPERMU. lee) 
METHANE .- ap @eoktp <P. nein 22050 
ETHANE Leer eG ie! 
PROPANE 4.508 52492 
N-BUTANE 0.084 32916 
N-PENTANE 0.000 Paood 
N-OCTANE SES LO. 620 
Lov Awe SALES 84.998 35-002 


PLATE VARIABLES 




















PLATE NO. TEMPERATURE VAPOUR RATE LIQUID RATE 
(DEG F) (LB MOLES) (LB MOLES) 
oa ea WeLCPeeeor dea CDERmU cde 

1 108.14 85.00 24.81 
2 yess 89.81 25.50 
3 112% 97 90.50 25.78 
4 L120 90.78 25.99 
5 LVORGT 90.99 26.28 
é Wat os on ei Sloe 26.80 
7 96.83 91.80 28.15 
8 Toe 70 93.15 35.00 


NUMBER OF ITERATIONS: =) 7 _ 
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COLUMN DATA 


Appendix F Annex 3 


PROBLEM NOw 2 
PROBLEM STATEMENT 


-—_—_—_—_———BUBBLE—POINT METHOD 





ABSORBER 





PRESSURE (PSIA) 


NUMBER OF PLATES 








60.0 4 
___THETA CONVERGENCE TOLERANCE = 0.0010 — 
PRODUCT STREAM CONVERGENCE TOLERANCE = 0.0578 


TEMPERATURE WEIGHTING FACTOR = 0.250 


























Be FEED DATA 
TEMPERATURE (DEG F) CONDITION 
FEED NOT SPECIFIED SATURATED VAPOUR 
ABSORBER OIL 90's Onan SUB-COOLED LIQUID 
He FEED. ABSORBER OIL 
COMPONENTS LB MOLES MOLE LB MOLES MOLE 
PER U.T. FRACTION PERS USI. FRACTION 
METHANE 28.500 __0. 2850 0.000 _ 0.0000 
ETHANE 15.800 0.1580 -0-000 0.0000 
PROPANE 24-000 0.2400 0.000 0.0000 
N-BUT ANE 16.900 0.21690 Phd NEW) 0.0200 
N-PENTANE 14.800 0.1480 5-520 02.0500 
OCTANE 0-000 0-2-0000 102.670 0.9300 
SPECIFIED TOP PRODUCT RATE = 57.800 LB MOLES/U.T. 
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Ce. ENTHALPY DATA 


CHAO-SEADER CORRELATION USED 


De. EQUILIBRIUM RATIO DATA 

















CHAOG-SEADER CORRELATION USED 


Es INITIAL ASSUMPTIONS 


PLATE NO. 


& WIN — 








PLATE VARIABLES 

TEMPERATURE VAPOUR RATE 
(DEG F) (LB MOLES) 
(PER U.T.) 

100.00 57.80 

110.00 76.10 

120.00 82.60 

135.00 85.80 


LIQUID RATE 
(LB MOLES) 
(PER U.Te) 

128.80 
135-10 








140.90 
152.60 
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PROBLEM NO. 2 
BUBBLE POINT METHOD 


Se PRODUCT STREAMS 























DRY GAS RICH OIL 
COMPONENTS (LB MOLES) (LB MOLES) 
(PER U.T.) (PER U.T.) 
METHANE 272425 1.075 
ETHANE beyeyatsy 2-418 
PROPANE lemiie Tie 
N-BUTANE 22452 16.658 
N-PENTANE 0.995 19.325 
OCTANE 0.764 101.906 
TOTAL RATES 57.790 ae 152.610 _ 
PLATE VARIABLES 
PLATE NO. TEMPERATURE VAPOUR RATE LIQUID RATE 
(DEG F) (LB MOLES) (LB MOLES) 
(PER UsTe) (PER U.T.) 
1 112.34 57-80 126.49 
2 121.90 73.99 132.05 
3 128.38 79235 136.71 
4 125.26 84.10 : 152.60 


CALCULATED FEED TEMPERATURE = 33.3 





THETA = 0.999548 


NUMBER OF ITERATIONS = 12 
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PROBLEM NO. 2 
_ PROBLEM STATEMENT 


BUBBLE POINT METHOD 




















ABSORBER 
As COLUMN DATA i 
PRESSURE (PSIA) NUMBER OF PLATES 
60.0 4 
THETA CONVERGENCE TOLERANCE = 0.0010 
PRODUCT STREAM CONVERGENCE TOLERANCE = 0.0578 
TEMPERATURE WEIGHTING FACTOR = 0.250 
B. FEED DATA 
TEMPERATURE (DEG F) CONDITION 




















FEED NOT SPECIFIED SATURATED VAPOUR 
ABSORBER OIL 90.0 SUB-COUOLED LIQUID 
FEED ABSORBER OIL 
COMPONENTS LB MOLES MOLE | LB MOLES MOLE 
; PER U.T. _ FRACTION PER UeT. FRACTION 
METHANE 28.500 0.2850 0.000 0.0000 
ETHANE 15.800 0.1580 0-000 0.0000 
PROPANE 24.000 0.2400 0.000 0.0000 
N-BUT ANE 16.900 0.1690 ee LO 0.0200 
N-PENTANE 14.800 0.1480 56520 0.0500 
N-OCTANE 0.0000 102.670 0.9300 


SPECIFIED TOP PRODUCT RATE 





0.000 





= 572800 LB MOLES/U.T. 
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C. ENTHALPY DATA 








YEN AND ALEXANDER CORRELATION USED 


De EQUILIBRIUM RATIO DATA 





NGAA POLYNOMIAL DATA AT CONVERGENCE PRESSURE = 30004 PSIA 


Es INITIAL ASSUMPTIONS 





PLATE VARIABLES 





PLATE NO. ~ TEMPERATURE VAPOUR RATE LIQUID RATE 
(DEG F) (LB MOLES) (LB MOLES) 
(PER U.T.) (PER U.T.) 
| 1 100.00 97-80 130-00 
rk 110.00 75.00 135.00 
3 120.00 85.00 140.00 
4 135.00 | 90.00 152.60 
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PROBLEM NO.w 2 
——BUBBLE POINT METHOD oo 
PRODUCT STREAMS 





























DRY GAS RICH OIL 
COMPONENTS (LB MOLES) (LB MOLES) 
pee ees (PER U.T.) (PER U.T.) 
METHANE 27.681 0.819 
ETHANE 14.094 1.706 
PROPANE 14.470 9.530 
N-BUTANE Neils 17.938 
N-PENTANE 0.267 20.053 
N-OCTANE 04122: eee 102.548 
TOTAL RATES 57.806 152.594 
PLATE VARIABLES 
PLATE NO. TEMPERATURE VAPOUR RATE LIQUID RATE 
| (DEG F). (LB MOLES) (LB MOLES) 
(PER U.Te) (PER U.Te) 
1 50.92 57.80 150.69 
2 8256 98.09 164.55 
3 110.99 111.95 171.50 
4 153.08 118.90 152.60 





CALCULATED FEED TEMPERATURE = 356.1 





THETA = 1.000970 





NUMBER OF ITERATIONS = 21 


























' y. 
> -O4% M3IBORE 


IOUTAM--TATOT -Saeaue- 
MAS AT2 JOCK 
PAD vs . 


340M Bd) ai 
> | J AIS) ee - 


- « * ¥ 

1uaGet2 
PiseeJl yy 
Pet : ® 

>) I - 

we 
Pm 
‘ «' 


{} ’ S ' 
: Cs 35 
aa eOQ!li 


BOef¢] 
jTARTaMAT Oa 44 GaTA 


Oveooorr:: 
- . bay a 


ITARST Le = J 


ou) @ 








Appendix F Annex 4 


PROBLEM NOe 2 
PROBLEM STATEMENT 








— ABSORBER 
SUM RATES METHOD 


As. COLUMN DATA 








PRESSURE (PSIA) | NUMBER OF PLATES 











PRODUCT STREAM CONVERGENCE TOLERANCE = 0.0578 
TEMPERATURE WEIGHTING FACTOR = 1.000 
Bs FEED DATA 
TEMPERATURE (DEG F) CONDITION 














FEED 29.5 SATURATED VAPOUR 
_. ABSORBER OIL 90.0 SUB-COOLED LIQUID 
: Oe FECOse eee ABSORBER OIL. 
COMPONENTS LB MOLES MOLE LB MOLES MOLE 
PER U.T. FRACTION PER U.T. FRACTION 
Pa > eo METHANE 28.500 0.2850 0.000 0.0000 Seinen 
ETHANE 15.800 0.1580 0.000 0.0000 
PROPANE 24.000 0.2400 0.000 0.0000 
N-BUTANE 16.900 0.1690 ZaAO 0.0200 
N-PENTANE 14.800 0.1480 52520 0.0500 
CCTANE 0.000 0.0000 102.670 0.9300 


SPECIFIED TOP PRODUCT RATE 





= 57.800 LB MOLES/U.T. 
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Ce. ENTHALPY DATA 





CHAO-SEADER CORRELATION USED 


RB Abdns Asana KARA: | A Venbernatdadd nesses tre descinsiaacontencmane 


De EQUILIBRIUM RATIO DATA 





CHAO-SEADER CORRELATION USED 


Es INITIAL ASSUMPTIUNS 








PLATE VARIABLES 








PLATE NO. TEMPERATURE VAPOUR RATE 
De ee DEG UF) ee ULB MOLES) 
(PER U.Te) 

1 100.00 57.80 

2 110.00 ee ol 0 

3 120.00 62.60 

4 135.00 85.80 











LIQUID RATE 


- (LB MOLES) ° 3 


(PER U.T.) 
128.80 
135.10 
140.90 
152.30 
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PRUBUEMSENOUSe 32 


SUM RATES METHOD 
Re ee PRODUCT. STREAMS. 








DRY GAS RiGHoult 
mee COMPONENTS. (LB MOLES) (LB MOLES) 
ake (PER U.T.) (PER U.T.) 
METHANE 272424 1.076 

ETHANE wage L363 16 mee 24 MI 
PROPANE To ao 11.239 
N-BUTANE Peaot 16.649 
$ N-PENTANE | 1.002 19.318 
Fe OCTANE Oise 101.897 
pee TOTAL. RATES: a beled 152.603 











ea PLATE VARIABLES 
oe CATE NO. 





TEMPERATURE VAPOUR RATE 
tf (DEG F) (LB MOLES) 
3 (PER U.Te) 

| iy 1 126835 4e 57-80 

2 122.30 74.03 

3 P2652 19tak 

4S (124.82 84410 

NUMBER OF ITERATIONS = 9 

















LIQUID RATE | 
(LB MOLES) 
(PER U.T.) 

126263 
LS 2600 
136.70 
152.60 
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Appendix F Annex 5 


PROBLEM NO. 3A 
PROBLEM STATEMENT 


—_ BUBBLE POTNT METHOD 
ABSORBER 





A. COLUMN DATA 








PRESSURE (PSIA) NUMBER OF PLATES 


a . qT 


INTER COOLER ON PLATE 3 WITH DUTY OF 1465000. BTU/U.T. 








THETA CONVERGENCE TOLERANCE = 0.CO10 
PRODUCT STREAM CONVERGENCE TOLERANCE = 0.6800 


TEMPERATURE WEIGHTING FACTOR = 0.100 








Be» FEED DATA 























TEMPERATURE (DEG F) CONDITION 
FEED NOT SPECIFIED SATURATED VAPOUR 
ABSORBER OIL 55.5 SUB-COOLED LIQUID 

FEED ABSORBER OIL 
COMPONENTS LB MOLES MOLE LB MOLES MOLE 
PER U.T. FRACTION PER Uele FRACTION 
H2S 39.700 0.0369 0.000 0.0000 
METHANE 482.500 0.4488 0.000 0.0000 
ETHYLENE 455500 0.0423 0.000 0.0000 
ETHANE 226.800 0.2109 0.000 0.0000 
PROPYLENE 10 ol OU smi s 0652 0.000 0.0000 
PROPANE 115.300 Crea 0.000 0.0000 
1 BUTENE 31.400 0.0292 0.000 0.0000 
N-BUTANE 37.500 0.0349 0.000 0.0000 
N-PENTANE 26-400 0.0246 0.000 0.0000 
ABSORBER OIL 0.000 0.0000 846.700 1.0000 
SPECIFIED TOP PRODUCT RATE = 680.000 LB MOLES/U.T.» 
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Ce. ENTHALPY DATA 





Us EQUILIBRIUM RATID DATA 


CHAO-SEADER CORRELATION USED 





CHAO-SEADER CORRELATION USED 


Es - INITIAL ASSUMPTIONS 





PLAT GevAR TABLES 





PLATE NO. TEMPERATURE VAPOUR RATE 
COPiGe Fr) (LB MOLES) 
(PERE Aye Liwth 

l 62.00 680.00 

2 60.50 760.00 

8) S37 eO0 15400 

4 40.00 oLoesUU 

7 G2.00 833500 

6 42.00 850.00 

qT 21240 870.200 








ua 


LIQUID RATE 


(LB MOLES) 
(PER U.Te) 
925.00 
940.00 
980.00 
1000.00 
1015.00 
1040.00 
1241.90 
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PROBLEM NO. 3 A 





COMPONENTS 


H25 


METHANE 


mir YOENe 
ETHANE 

PROPYLENE 
PROPANE 

LeoUT ENE 
N-BUT ANE 
N-PENTANE 





ABSORBER OIL 


TOTAL RATES 


PLATE NO. 


NOW HLH WIN 


Pie ihe== Os 9993.10 





pe ee Ee 
PRODUCT STREAMS 











DRY GAS RICH DOLL 
CEB] MOLES (LB MOLES) 
LVER tMealien) (REREUs tie) 

hie 73.8 ecg 25.562 

457.919 24.2581 
35.049 10.451 
L522.973 73-827 
9.630 60.470 
ayer kG 105.142 
0.002 31.398 
0.001 37-499 
0-000 262400 
eR saws 846.693 
Of9.8 18 1242.022 





PLATE VARIABLES 





2i 049 


TEMPERATURE VAPOUR RATE 

(DEG F) (LB MOLES) 

TP eRe elie) 
Cleat 680.00 
60.253 159.444 
37.20 774294 
39.89 812.20 
41.97 830.59 
41.94 846.86 
Gules 





NUMBER OF ITERATIONS = 15 








GIQGUIDARATE 
(LB MOLES) 
(PERS Us teu 

926.214 
941.64 
978.90 
997.29 
1013.58 
1037.89 
1241.90 
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~ COMPONENTS MOLE PERCENT ABSORBED ~ 


PROBLEMPNO es 3 A 








H2S | 64.39 
Pie METHANE 3 3h 5.09 gas Matinee 
Pig UCNE ee 22.97 
ETHANE Bun 
eee PROPYLENE 8G 2G 
PRUPANE 91.19 
1 BUTENE 99.99 
_ ..N-BUT ANE | 100.00 ; Hiei a 
N-PENTANE 100.00 


ABSORBER OIL -0.00 
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Appendix F Annex 6 


PROBLEM NO. 3B 

PROBLEM STATEMENT 

___ BUBBLE POINT METHOD 
ABSGRBER 





Ae COLUMN DATA 
PRESSURE (PSIA) NUMBER OF PLATES 


91,5 | a 


INT ERS COULERSONUPLATE. 3. WITH DUTY OF 10000000 BTU/US Te 





“THETA CONVERGENCE TOLERANCE = #£0.0010 
~~ PRODUCT STREAM CONVERGENCE TOLERANCE = 0.6800 


TEMPERATURE WEIGHTING FACTOR = 0.100 


Be. FEED DATA 








TEMPERATURE (DEG F) CONDITION 
FEED NOT SPECIFIED SATURATED VAPOUR 
ABSORBER OIL 55.5 SUB-COOLED LIQUID 
FEED ABSORBER OIL 
COMPONENTS LB MOLES MULE LB MOLES MOLE 
PER U.T. FRACTION PER U.T. FRACTION 
H2S 39.700 0.0369 0.000 0.0000 
Bee) METHANE 3) 482.500 0.4488 fae 0. 000 0.0000 
ETHYLENE 94545500 O.0425— 0.000 0.0000 
ETHANE 226-800 Oe2109 0.000 0.0000 
PROPYLENE Te OO 0.0652 0.000 0.0000 
PROPANE | 115.300 Calor 0.000 0.0000 
1 BUTENE 31.400 On0292 0.000 0.0000 
: N=BUTANE iat 374500 40103495055 ee 0.000.) 0.0000 % F 
met si) N=-PENTANE ~ 26.2400 0.0246 0.000 0.0000 
ABSORBER OIL 0.000 0.0000 - 846.700 1.0000 


I ah aa ac Pc hh ince ema t  aeAe ne nn 


SPECIFIED TOP PRODUCT RATE = 680.000 LB MOLES/U.T. 
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C. ENTHALPY DATA 


_ CHAG-SEADER CORRELATION USED 


ervey erenrere Tamara pope veers vol teeen sy treTeeP PED EaEOD eT TEUvUODTy IPDS Saas TOOT ODT EDS TT ITOCT EE 17 TO TEEN ESTED TETUTED 





De EQUILIBRIUM RATIO DATA 
CHAOD-SEADER CORRELATION USED 
E. INITIAL ASSUMPTIONS 
PLATE VARIABLES 
PLATE NO. TEMPERATURE VAPOUR RATE LIQUID RATE 
ale eE RUDEG FJ ANS 8 (UB MOLES) 993) “See LB)UMOLES) inane 
{PERS . lie) VEE Ret stipes) 
l 62.00 680.00 925.00 
2 60.50 760.00 940.00 
3 3%250 &t5.00 980.00 
4 40.00 65 30G 1000.00 
AB or 8 Gp eee eae Sve NO Srelee 2 835.00 a 1015.00 bs 
6 42.00 850.00 1040.00 
qT 21.40 870.00 1241.90 
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PROBLEM NU. 3 


BUBBLE POINT METHOD 
PRODUCT STREAMS 











Dee en ee ee ee DRY GAS ERICH OLR eee 
COMPONENTS (LB MOLES) (LB MOLES) 
(PER U.T.) (PER U.T.) 
H2S 14.335 25.365 
METHANE 457.075 25.425 | 
ETHYLENE 34.707 10.793 
eee feo E THANE 151.149 13.69) 2 eee 
PROPYLENE 10.815 59.285 
PROPANE 12.014 103.286 
1 BUTENE 0.004 31.396 
N-BUT ANE 0.002 37.498 
N-PENTANE 0.000 26.400 
Soe ABSORBER Olle 0.007 by 346.693 2 eee 
TOTAL RATES 680.106 1241.794 
PLATE VARIABLES 
PLATE NO. TEMPERATURE VAPOUR RATE LIQUID RATE 
ee ee (DEG F) (LB MOLES ee ee LS MOLES) tee 
(PER UeTe) (PERSU ale) 
l 62.39 680.00 927.94 
2 62.18 1G le & 944.71 
: 3 46.95 (Himanonl 974.94 
4 48.81 808.24 988.66 
Peg oe ;. 49.83 821.96 998 6 4 6 
| tS & 47.85 831.76 1017.65 
ue L6e33 850.95 1241.90 
THETA = 1.000246 


NUMBER GF ITERATIONS = 37 


ra vena a re OUST cn TT Oe nen In NINOITSI Tn nn eae ced SSSISSSSgSS 








PROBLEM NO. 


COMPONENTS MOLE PERCENT ABSORBED 


H2S 
METHANE 
ETHYLENE 
ETHANE 
PROPYLENE 
PROPANE 
1 BUTENE 
_N=BUTANE 


Pus) N=PENTANE. - _ 
ABSORBER OIL 
{ 


Oren enaeeen SanETE eM eee shes nero iecures) \iserestinel ices.) Veluecdet.. Ustbe |) scanners Coe abenes() tit cl sre eent es Specie tines 
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33.36 
84.57 | 
89.58 
99.99 
99.99 

100.00 
-0.00 





Oba ers ieee as AP erat Oidet hanna red eiies aneramvrentestin’ 


3 


~~ 


atneiiatiieay 





Appendix F Annex 7 


PROBLEM NOw 4 
PROBLEM STATEMENT 


Se BUBBLE PL POINT METHOD 






































SPECIFIED TOP 


PRODUCT RATE 





ABSORBER 
A. COLUMN DATA Hing: 
PRESSURE (PSIA) NUMBER OF PLATES 
91.5 7 
THETA CONVERGENCE TOLERANCE = 0.0010 
PRODUCT STREAM CONVERGENCE TOLERANCE = 0.7690 
TEMPERATURE WEIGHTING FACTOR = 0.100 
B. FEED DATA 
TEMPERATURE (DEG F) CONDITION 
FEED NOT SPECIFIED SATURATED VAPOUR 
ABSORBER OIL 56.4 SUB-COOLED LIQUID 
s FEED ABSORBER OIL 
COMPONENTS LB MOLES MOLE LB MOLES MOLE 
nee (Sie FRACTION eeey Whyte FRACTION 
eer 2s | 38.000 0.0362 0.000 0.0000_ 
METHANE 411.600 0.3924 0.000 0.0000 
ETHYLENE 44.400 0.0423 0.000 0.0000 
ETHANE 246.500 0.2350 0.000 ° 0.0000 
PROPYLENE 70.500 0.0672 0.000 0.0000 
PROPANE 128.000 Ol 20 0.000 0.0000 
1 BUTENE 37.600 0.0358 0.000 0.0000 
N-BUTANE 42500 0.0405 0.000 0.0000 
N-PENTANE 29.900 0.0285 0.000 0.0000 
ABSORBER OIL 0.000 0.0000 838.000 1.0000 





Ce. ENTHALPY DATA 








~ CHAO-SEADER CORRELATION USED 


Ce EQUILIBRIUM RATIO DATA 





CHAO-SEADER CORRELATION USED © 


Es INITIAL ASSUMPTIONS 








PLATE VARIABLES 





PLATE NO. TEMPERATURE VAPOUR RATE LIQUID RATE 
(DEG F) Pee (LB MOLES) 8S “ar (CBP MOLES) ¢ 
(PER U.T.) (PER U.sTe) 

l 70.00 769.00 850.00 

2 10.00 750.00 6850.00 

3 70 -00MnE 800.00 850.00 

4 70.00 850.00 850.00 
5 703 OObeee ts S00 n00NNL ss 85000 Cm ht ee ae 

6 70.00 1000.00 850.00 

7 70.00 | 1075.00 1118.00 


cea nr 














| 


PROBLEM NO. 


4 


BUBBLE POINT METHOD 





PRODUCT STREAMS 











RICH OLL seam 

(LB MOLES) 

(PER U.T.) 
11.272 
13.281 
4.910 
58.282 08 
33.506 
69.219 
37.339 





feet the DRY GAS 
COMPONENTS (LB MOLES) 
(PER U.T.) 
H2S Pee 26 A728) 
METHANE 398.319 
ETHYLENE 39.490 
— ETHANE ee 208.218 
PROPYLENE 36.994 
_ PROPANE 58.781 
1 BUTENE 0226 le 
N-BUT ANE 0.156 
N-PENTANE 0.000 
ABSORBER OIL ~ 0.011 
68.958 


TOTAL RATES if, 





PLATE VARIABLES 











42.344 
29.900 
837.989 


1118.042 








PLATE NO. TEMPERATURE VAPOUR RATE LIQUID RATE 
(DEG F) (LB MOLES) (LB MOLES) 
| (PER U.T.) (PER U.Te) 

l 71.06 769.00 977.97 
2 75.08 908.97 1008.79 
3 77213 939.79 TO22221 
4 78.91 953.21 1031.46 
5 81.40 962.46 1042.99 
6 85.36 973.99 1063.05 
7 89.62 994.05 1118.00 
CALCULATED FEED TEMPERATURE = 66.2 


THETA = 0.999108 





NUMBER OF ITERATIONS = 


20 

















PROBLEM NOs 4 





COMPONENTS MOLE PERCENT ABSORBED 








H2S 29-66 
METHANE Cy yrs) 
ETHYLENE 11.06 
ETHANE lo wo3 
___ PROPYLENE 47.038 
PROPANE 54.08 
1 BUTENE 99.31 
N-BUTANE 99.63 
N-PENTANE 100.00 


ABSORBER OIL fe Us O0 
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Appendix F Annex 8 


PROBLEM NO. 5 
PROBLEM STATEMENT 





ABSORBER 





PRESSURE (PSIA) NUMBER OF PLATES 


1200.0 6 





INTER COOLER ON PLATE 3 £4WITH DUTY OF 236344. BIU/U.T. 


THETA CONVERGENCE TOLERANCE = 0.0010 


PRODUCT STREAM CONVERGENCE TOLERANCE = 224970 





TEMPERATURE WEIGHTING FACTOR = 0.250 


Be. FEED DATA 


FEED 
ABSORBER OIL 


COMPONENTS 


NITROGEN 
co2 
H2S 
METHANE 
ETHANE 
PROPANE 
[-BUTANE 
N-BUTANE 
I-PENTANE 
N-PENTANE 
N-HEXANE 
N-OCTANE 

















TEMPERATURE (DEG F) CONDITION 
NOT SPECIFIED SATURATED VAPOUR 
20.0 SUB-COOLED LIQUID 
FEED ABSORBER OIL 
LB MOLES MOLE LB MOLES MOLE 
PER U.T. FRACTION PER U.T. FRACTION 
40.850 0.0133 0.580 0.0012 
11.600 0.0038 22440 0.0049 
324102998 0.0011 0.000 0.0000 
2377610 0.7737 102.540 0.2058 
461.420 0.1502 118.610 0.2380 
147.730 0.0481 21.080 0.0423 
7.260 0.0024 0.020 0.0000 
19.040 0.0062 0.020 0.0000 
1.730 0.0006 0.020 0.0000 
1.640 0.0005 0.020 0.0000 
0.600 0.0002 0.000 0.0000 
0.000 0.0000 253.000 0.5077 


- SPECIFIED TOP PRODUCT RATE = 2497.590 LB MOLES/U.T. 
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Ce. ENTHALPY DATA 








CHAO-SEADER CORRELATION USED 


De EQUILIBRIUM RATIO DATA 





CHAO-SEADER CORRELATION USED 


Es. INITIAL ASSUMPTIONS 





PLATE VARIABLES 


PLATE NO. TEMPERATURE VAPOUR RATE 
Q (DEG F) — (LB MOLES) 
(PER U.Te) 

1 40.00 2497.59 

2 38.00 2650-00 

3 36.00 2800.00 

4 34.00 2950.00 

ne 5 32.00 A 300.00 

6 30.00 3100.00 





LIQUID RATE 
(LB MOLES) 
(PER U.T.) 

500.00 
700.00 
900.00 
1000.00 
1150.00 
1073.63 
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PROBLEM NO. 5 
BUBBLE POINT METHOD 


PRODUCT STREAMS 








DRY GAS RICH OTL 


























COMPONENTS (LB MOLES) (LB MOLES) 
(PER U.T.) (PER U.T.) 
NITROGEN 38.480 2.950 
C02 as vie 5.328 
H2S 0.801 2.609 
METHANE | 20872429 | 392.721 
ETHANE 329.695 250.335 
PROPANE 30.408 138.402 
I~BUTANE 0-060 7-220 
N-BUTANE 0.036 19.024 
I-PENTANE 0.004 146 
- N=PENTANE _ 0.003 1.657 
N-HEXANE 0.000 0.600 
N-OCTANE : 3.202 249.798 
TOTAL RATES 24982829 1072. 390 
a PLATE VARIABLES 
PLATE NO. TEMPERATURE VAPOUR RATE LIQUID RATE 
(DEG F) (LB MOLES) (LB MOLES) 
' (PER U.T.) (PER U.T.) 
l 34.80 2497.59 672219 
2 34.11 2671245 702.88 
: 3 eyes a 2702.14 753.69 
4 35.03 2752.95 794.76 
5 34.46 2794.02 873.98 
6 31.31 2873-24 1073.63 





CALCULATED FEED TEMPERATURE = 24.9 


THETA = 1.002525 


NUMBER OF ITERATIONS = 46 
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Appendix F Annex 9 
PROBLEM NO. 5 
PROBLEM STATEMENT 


emitter mewetne UM RALTBO METHOD ~~ T 
ABSORBER 





“Aw COLUMN DATA 





PRESSURE (PSIA) NUMBER OF PLATES 


1 200+0 6 





INTER COOLER ON PLATE 3 WITH DUTY OF -236344. BTU/U.eT. 
PRODUCT STREAM CONVERGENCE TOLERANCE = 2.4976 | 


TEMPERATURE WETGHTING FACTOR = 1.000 








woe) FEED DATA 

















TEMPERATURE (DEG F) CONDITION 
FEED f B24 32. eee SATURATED VAPOUR 
ABSORBER OIL 2050 SUB-COOLED LIQUID 

FEED ~ ABSORBER OIL 
COMPONENTS LB MOLES MOLE LB MOLES MOLE 
} ae PEREUsT » FRACTION Pena Uli FRACTION 
NITROGEN 40.850 0.0133 0.580 0.0012 
C02 11.600 0.0038 2-440 0.0049 
moe 2S Deo 3 410 0.0011 at 0-000 0.0000 
METHANE 23772610 Os tl3 Leia 102.540 0.2058 
ETHANE 4614420 Os 1502 118.610 0.2380 
PROPANE 147.730 0.0481 21.080 0.0423 
I-BUTANE Ta260 0.0024 0.020 0.0000 
N-BUTANE 19.040 0.0062 0.020 0.0000 
Perl PENTANEG sewer tel «1 30)1 0. 0006 mio 0.020 0.0000 
IN=PENTANEGa sumeeere | 6640480. 000Sme 1-04. 020 0.0000 
N-HEXANE  . 0.600 0.0002 0.000 0.0000 
N-OCTANE 0.000 0.0000 253-000 0.5077 





SPECIFIED TOP PRODUCT RATE = 2497-2590 LB MOLES/UsTs 





a ae 





Ce ENTHALPY DATA 





CHAO-SEADER CORRELATION USED ~ 


D. EQUILIBRIUM RATIO DATA 





CHAO-SEADER CORRELATION USED 


Es INITIAL ASSUMPTIONS 





PLATE VARIABLES. 





PLATE NO. TEMPERATURE VAPOUR RATE 
ee SeCDEGSF iyeueen (LB MOLES) 
f Woes WRI RS) 
1 20.00 | 2500.00 
2 20-00 2550-00 
3 20.00 2600.00 
4 20.00 2700.00 
a ome Rie 20200 AY: 2800-00 
6 20.00 2900.00 





LIQUID RATE. 
(18 MOLES) feed 
(PER UeTe) 
500.00 
500.00 
500.00 
550.00 
600.00 
600.00 
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NITROGEN 
CO2 
H2S 


METHANE 


~ ETHANE 


PROPANE 
I—-BUTANE 


nae sande 


pect ate Nh 


N-BUTANE 
I-PENTANE 


N-PENTANE _ 


~N-HEXANE 
N-OCTANE 


TOTAL RATES 


Ow f& Wh ee 


Se CANPONENT Sie 


PROBLEM NO.w 5 
SUM RATES METHOD 





~ PRODUCT STREAMS 











19.025 








‘DRY GAS RICH OIL 
(LB MOLES) (LB MOLES) 
(PER U.T.) (PER U.T.) 

fe 3541 Oe 22952 

8.703 5.337 
0.795 2.615 
2087.057 393.093 
329.557 250.473 
30.262 138.548 
04060 7.220 
0.035 
0.004 1.746 
0.003 1.657 
0.000 0.600 
3.183 249.817 
2498.138 1073. 082 


PLATE VARIABLES 


TEMPERATURE 
(DEG F) 





34.67 
aiey sy 
31-54 
34.225 
DibeIo 
31.01 


VAPOUR RATE 


LIQUID RATE 





(LB MOLES) (LB MOLES) 
(PERSUs Te) (PER U.Te) 
2498.14 675.32 
2675413 708.35 
2708.16 757.41 
2757621 794.43 
2794.24 871.36 
28 fle 7, 


1073.08 





NUMBER OF ITERATIONS = 15 
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Appendix F Annex 10 


PROBLEM NO. 6 
PROBLEM STATEMENT 


BUBBLE POINT METHOD 
REBOILED ABSORBER 





A.-. COLUMN DATA 




















PRESSURE NO. OF PLATES FEED ENTERS SIDE STREAM TAKEN 
—(PSIA)  —_ (INCLUDING ON PLATE NO. FROM PLATE NO- 
REBOILER) 
300.0 ba ee 10 [le ae ep 9 
_ SPECIFIED TOP PRODUCT RATE SPECIFIED SIDE STREAM RATE 
95.000 LB MOLES/U.T. 15.000 LB MOLES/U.T. 

THETA CONVERGENCE TOLERANCE =  } 0.0010 

_ PRODUCT STREAM CONVERGENCE TOLERANCE = 0.0950 


TEMPERATURE WEIGHTING FACTOR = 0.2250 





ho Be FEED DATA 

















| TEMPERATURE (DEG F) CONDITION 
FEED NUMBER 1 eri 4. 5 ee _ SATURATED VAPOUR 
ABSORBER OIL - 90.0 SUB-COOLED LIQUID 
FEED ABSORBER OIL 
COMPONENTS LB MOLES MOLE LB MOLES MULE 
| ee PER U.T. FRACTION PER UsT.s FRACTION. 
METHANE 80.000 0.8000 0.000 0.0000 
ETHANE 6.667 0.0667 0.000 0.0000 
PROPANE  —,_— 62667 ..0.0667 fa 0.000 0.0000 
N- BUTANE 6.667 0.0667 0.000 0.0000 


OCTANE 0.000 0.0000 30.000 1.0000 
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Ce ENTHALPY DATA 








~ YEN AND ALEXANDER CORRELATION USED | 


“De EQUILIBRIUM RATIO DATA 





_ _NGAA POLYNOMIAL DATA AT CONVERGENCE PRESSURE = 3000. PSIA 


‘Es INITIAL ASSUMPTIONS 


RPUATES VARIABLES 2 




















PLATE NO. TEMPERATURE VAPOUR RATE LIQUID RATE 
: (DEG F) (LB MOLES) (LB MOLES) 
3 is i Teh i (PER U.T.) (PER U.T.) 
1 100.00 95.00 40.00 
2 150.00 105.00 40.00 
3 150.00 105.00 45200 
4 160.00 110.00 50.00 
5 150.00 115.00 110.00 
6. 220.00 je 75.00 85.00 
7 280.00 50.00 90.00 
8 350.00 50.00 90.00 
9 400.00 ip nn 50 e00 Ree 100.00 
10 480.00 65.00 20.00 
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PROBLEM NOw 6 
BUBBLE POINT METHOD ~ 





PRODUCT STREAMS | 


Pe tUP’ PRODUCTS BOTTOM PRODUCTS SIDE STREAM 





COMPONENTS (LB MOLES) (LB MOLES) (CU BSMOLES) 

‘ CUER@U st .) Leehees tet) VeER@Us le) 

__ METHANE Be 0- 000mm ne 0.000 0.000 
ETHANE 62665 0.000 0.002 
PROPANE DOD 0.025 0-076 
_N-BUTANE 1.654 1.678 3.335 
OCTANE 0-113 Doe UD bleo2h2 
TOTAL RATES eee 46S fee oe ee 206 009 | 14.2994 








PLATE VARIABLES 





PLATE NO» TEMPERATURE VAPOUR RATE LIQUID RATE 
(DEG F) (LB MOLES) (LB MOLES) 
(PER U.Te) (PER U.T.) 
ae L_ 164.4109 bo5..000, 52.59 
2 116.96 117.59 61.35 
3 143.13 126.35 66.60 
4 156.89 131.60 70.43 
5 162.05 135.43 76.43 
6 259.70 41.43 110.68 
i 293.94 15.68 110.59 
8 350.97 75259 109.20 
9 439.36 Ti Ome 140.97 
iene: 502.48 105.97 20.00 


CALCULATED REBOILER LOAD = 


THETA (1) 


SLOETAU 2) 














1.000000 


1.000000 _ 


NUMBER OF ITERATIONS = 19 
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PROBLEM NO. 6 
PROBLEM STATEMENT 


—___—_BUBBLE-POINT METHOD— 
REBOILED ABSORBER 





A. COLUMN DATA 





PRESSURE NO. OF PLATES FEED ENTERS SIDE STREAM TAKEN 


(PSTA) —— (INCLUDING ON PLATE NO. FROM PLATE NOw 
REBOILER) 
300.0 10 6 9 





ee oPECIFIED TOP PROOUCT RATE 


95.000 LB MOLES/U.T. 15.000 LB MOLES/U.T. 











THETA CONVERGENCE TOLERANCE = 0.0010 
__ PRODUCT STREAM CONVERGENCE TOLERANCE = 0.0950 
TEMPERATURE WEIGHTING FACTOR = 0.100 
me posew FEED DATA 
TEMPERATURE (DEG F) CONDITION 





SPECIFIED SIDE STREAM RATE 








FEED NUMBER 1 44.5 _ SATURATED VAPOUR 
ABSORBER OIL 90.0 SUB-COOLED LIQUID 
geo : FEED ABSORBER OIL 
COMPONENTS LB MOLES MOLE LB MOLES MOLE 
PER U.T. FRACTION PER U.T. FRACTION 
METHANE 80.000 0.8000 0.000 0.0000 
ETHANE 6.667 0.0667 0.000 0.0000 
i scone, PROPANE) yee te 02 661 7 50+ 0667 0.000 0.0000 
| N-BUTANE £66667 °&0.0667 0.000 0.0000 
N-OCTANE 0.000 0.0000 30.000 1.0000 
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Ce. ENTHALPY DATA 





~ CHAO-SEADER CORRELATION USED 


ci eaeetah! AA APO MOEAS NER HORS IAC OTE SATE NOAA ROA Ue Ui taeda th ib 


De. EQUILIBRIUM RATIUO DATA 





~ CHAO-SEADER CORRELATION USED 


Es INITIAL ASSUMPTIONS 





PLATE VARTABLES 














PLATE NO. TEMPERATURE VAPOUR RATE LIQUID RATE 
Whe saa (DEG F) : (LB MOLES) (LB MOLES) 
re eee é (PER U.Te) (PER U.Te) 

l 100.00 95.00 40.00 

2 150.00_ ee 05400) 40.00 

3 150.00 105.00 45400 

4 160.00 116200 50.00 

ip gia eee fre 1502008) a | 115600 110.00 

6 220.00 75.00 85.00 

7 280.00 50.00 90.00 

8 350.00 50.00 90.00 

9 400.00 50.00 100.00 

10 480.00 65.00 20.00 
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PROBLEM NO. 6 


BUBBLE POTNT METHOD 
PRODUCT STREAMS 








TOP PRODUCT BOTTOM PRODUCT SIDE STREAM 








~~" COMPONENTS (LB MOLES) (LB MOLES) (LB MOLES) 

(PER U.T.) (PER U.T.) (PER U.T.) 

METHANE 79.999 0.000 0.001 

ETHANE 6.664 0.000 0.002 

PROPANE 6.400 0.078 0.188 

aes -N=BUTANE 399m 1.974 3.293 
N-OCTANE 0.538 17.949 Lie513 

TOTAL RATES 95.001 20.002 14.997 











PLATESVAR TABLES 














| PLATE NO. =~ TEMPERATURE ~ VAPOUR RATE LIQUID RATE ease 
Tea eeTy has FOP REDEG Fi : (LB MOLES) (LB MOLES) ~~ 
(PER UsTe) (PER U.T<) 

1 125.83 95-00 39.403 

2 136.46 104.03 41.61 

3 137246 106.61 43294 

sath \dyvsebebiadven sis > wish dsadesb evn ousnbeitiaanceteens 4 P ‘ L 2 ip ~ 6 8 1 08 > 9 4) 4 S) ~ 9 0 

5 93.10 113.90 leo? 

6 262674 76.53 84.06 

pea Bl 7 303.40 | 49.06 87.78 

8 356.81 ayo A TAS B7.74 

9 429.18 52.74 100.18 

LO 488.74 | 65.18 20.00 

CALCULATED REBOILER LOAD = 0.89313927E 06 BTU/U.T. 

THETA( 1) = 0.999961 
THETA( 2) = 1.000280 











NUMBER OF ITERATIONS = 36 
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Appendix F Annex ll 


PROBLEM NOw 7 
PROBLEM STATEMENT _ 





BUBBLE POINT METHOD 
REBOILED ABSORBER 















































A. COLUMN DATA 
PRESSURE  NO~ OF PLATES FEED ENTERS SIDE STREAM TAKEN. 
(PSTA) (INCLUDING ON PLATE NO. FROM PLATE NO. 
REBOILER) 
285.0 16 6 (NO SIDE STREAM) 
~ SPECIFIED TOP PRODUCT RATE SPECIFIED SIDE STREAM RATE | 
es 677.000 LB MOLES/U.T. 0.000 LB MOLES/U.T. 
THETA CONVERGENCE TOLERANCE = 0.0010 
PRODUCT STREAM CONVERGENCE TOLERANCE = 0.6770 
TEMPERATURE WEIGHTING FACTOR = 0.250 
' Bs FEED DATA 
TEMPERATURE (DEG F) — CONDITION | 
FEED NUMBER 1 50.0 VAPQUR/LI QUID 
ABSORBER OIL -5.0 SUB-COOLED LIQUID 
FEED ABSORBER UIL 
COMPONENTS LB MOLES MOLE LB MOLES “MOLE _ 
PER U.T. FRACTION PER UeTe FRACTION 
METHANE 180.500 0.1055 0.000 0.0000 
ETHANE 474.500 Ceythps) 0.000 0.0000 
PROPANE 440.200 0.2573 0.000 0.0000 
I-BUTANE 64.300 94020376 0.000 0.0000 
ht ea N-BUTANE 128.800 0.0753 | __0.000 0.0000 | 
I-PENTANE 19.500 0.0114 0.000 0.0000 
N-PENTANE 19.400 OVO nia 0.000 0.0000 
N-HEXANE 22-100 0.0129 0.500 0.0019 
N-HEPTANE 5 2300 0.0031 2.100 0.0079 
N-NONANE 128.3090 0.0750 95.300 0.3584 
N-DECANE 228.000 se 0.1333 32 - 168.000 0.6318 
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C. ENTHALPY DATA 





YEN AND ALEXANDER CORRELATION USED 


De EQUILIBRIUM RATIO DATA | 








NGAA POLYNOMIAL DATA AT CONVERGENCE PRESSURE = 3000. PSIA 


Es INITIAL ASSUMPTIONS 








PLATE VARIABLES 























PLATE NO. TEMPERATURE VAPOUR RATE LIQUID RATE 
(DEG F) (LB MOLES) (LB MOLES) 
(PER U.T.) (PER U.Te) 
2 1 72200 677.00 280.00 
2 80.00 700.00 320.00 
3 90.00 800.00 350.00 
4 100.00 800.00 500-00 
5 110.00 900.00 650.00 
6 120.00 1000.00 900.00 
7 130.00 pee 8.00200 1050.00 
8 140.00 800.00 1100.00 
9 150.00 800.00 1100.00 
10. 160.00 a 60020086 6s. 4) 1100200 
11 170.00 800.00 1100.00 
12 180.00 800.00 1200.00 
13 193.00 800.00 1200.00 
14 200.00 800.00 1300.00 
15 210.00 800.00 1300.00 


16 250-00 800.00 1299.80 
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PROBLEM NOw 7 





fe BUBEbE eROIN TD GMETHOD ~~ 
PRODUCT STREAMS 


TOP PRODUCT BOTTOM PRODUCT SIDE STREAM 























COMPONENTS (L8 MOLES) (LB MOLES) (LB MOLES) 
oe eegaia (PER U.T.) (PER U.T.) (PER U.T.) 
METHANE 180.500 0.000 0.000 
ETHANE 465.126 9.374 0.000 
PROPANE Biel oe 409.098 0.000 
I- BUTANE 0.072 64.228 0.000 
N-BUTANE 0.025 128.775 0.000 
; I-~PENTANE __0.000 19.500 0.000 
N-PENTANE 0.000 19.400 0.000 
N-HEXANE 0.006 22.594 0.000 
N-HEPTANE 0.009 7.391 0.000 
N-NONANE 0.063 223.537 0.000 
N-DECANE 0.042 395.958 0.000 
TOTAL RATES 676.946 12992854 0.000 


PLATE VARIABLES 








PLATE NO. TEMPERATURE VAPOUR RATE LIQUID RATE 

(DEG F) (LB MOLES) (LB MOLES) 

22 ee (PER U.Te) (PER U.sTe) 
1 55.04 677.00 712.29 
2 76.83 1123.39 709-96 
3 88.20 1121.06 707.94 
4 96.90 1119.04 706.16 
5 104.70 Diiv.26 706.74 
6 108.03 943.57 2250.62 
7 120.45 950.82 2252280 
8 127.85 953.00 2252260 
9 136.15 952.80 22524220 
10 146.39 952.40 2252263 
11 157.76 952.83 2254.32 
12 168.76 954-52 2256485 
13 178.33 957205 2259.35 
14 186.61 959.55 2260.31 
15 196.96 960.51 2246014 
16 260 +84 946.34 1299.80 











CALCULATED REBOILER LOAD = 0.56045933E O7 BIU/U.T. 





THETA( 1) = 1.000000 





THETA( 2) = 12000000 


NUMBER OF ITERATIONS = 28 
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PROBLEM NO.w 7 
PROBLEM STATEMENT 


BUBBLE POINT METHOD 
REBOILED ABSORBER 








A. COLUMN DATA 





PRESSURE NO.» OF PLATES BEEQVSENTERS SIDE STREAM TAKEN 
__(PSTA) (INCLUDING ON PLATE NO. FROM PLATE NO. 
REBOILER) 
285.0 16 6 (NO SIDE STREAM) 





SPECIFIED TOP PRODUCT RATE 


677-000 LB MOLES/U.T. 


SPECIFIED SIDE STREAM RATE 


0.000 LB MOLES/U.T. 














THETA CONVERGENCE TOLERANCE = + 0.0010 
PRODUCT STREAM CONVERGENCE TOLERANCE = 0.6770 
TEMPERATURE WEIGHTING FACTOR = 0.250 
Be FEED DATA 
TEMPERATURE (DEG F) CONDITION 
FEED NUMBER 1. her 50.01 _VAPOUR/LIQUID 
ABSORBER OIL =5.0 SUB-COOLED LIQUID 
| FEED ABSORBER OIL 
COMPONENTS LB MOLES MOLE LB MOLES MOLE 
| PERSU. ieee RAC TION EE AWS Iho FRACTION 
METHANE 180.000 0.1052 0.000 0.0000 
ETHANE 474.500 0.2774 0.000 0.0000 
PROPANE 440.200 0.2574 0.000 0.0000 
I-BUT ANE 64.300 0.0376 0.000 0.0000 
N-BUT ANE 128.800 0.0753 0.000 0.0000 
I-PENTANE 19.500 0.0114 0.000 0.0000, 
N-PENTANE 19.400 e-vos 0.000 0.0000 
N-HEXANE 22-100 ODO P29 0.500 0.0019 
_N-HEPTANE 5.300 0.0031 2a100 0.0079 
N-NONANE 128.300 0.0750 95.300 0.3584 
N-DECANE 228.000 0.1333 168.000 0.6318 
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Ce ENTHALPY DATA 





CHAO-SEADER CORRELATION USED 


De EQUILIBRIUM RATIO DATA 








CHAG-SEADER CORRELATION USED 


Es INITIAL ASSUMPTIONS 








PLATE VARIABLES 




















PLATE NO. TEMPERATURE VAPOUR RATE ELQUIDBRATLE 

(DEG F) (LB MOLES) (LB MOLES) 

{PER UeT.) (PER U.sTe) 
N 70.00 677-00 300.00 
2 80.00 _ _750.00 350.00 
3) 90.00 850.00 400.00 
& 100.00 950.00 500.00 
5 110.00 1000.00 600.00 
6 120.00 LEGOS 00 7005.00 
q 130.00 1150.00 800.00 
8 140.00_ 1200.00 900.00 
9 150.00 1200.00 1000.00 
10 160.00 1200.00 1000.00 
ll 170.00 1250.00 1000.00 
12 180.00 1250.00 1000.00 

13 190.00 1300.00 1000-00 .- 
14 200.00 1350.00 1000.00 
Va) 210.00 1400.00 1100.00 
16 260.00 1450.00 1299.30 
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PROBLEM NOw; 7 
BUBBLE POINT METHOD 





Eo PRODUGTESTREAMS! (0 - & 


TOP PRODUCT BOTTOM PRODUCT SIDE STREAM 

















COMPONENTS (LB MOLES) (LB MOLES) (LB MOLES) 
(PER U.T.) (PER U.T.) (PER U.T.) 

_METHANE | Pel 80. 000m e 10. 000¢ 0.000 
ETHANE 457.902 16.598 0.000 
PROPANE 38.659 401.541 0.000 
I-BUTANE 0.182 64.118 0.000 
N-BUT ANE 0.076 128.724 0.000 
I-PENTANE 0.000 19.500 0.000 
N-PENTANE m0. COCM eum) 19.400 0.000 
N-HEXANE wean les 222583 0.000 
N-HEPTANE 0.027 7.373 0.000 
N-NONANE 0.174 2232426 0.000 
N-DECANE 0.129 395.871 0.000 

TOTAL RATES m6 (1016 (m1 299.1353 0.000 | 





PLATE VARTABLES 





RameeeTHETA( 2) 

















PLATE NO. TEMPERATURE VAPOUR RATE LIQUID RATE 
(DEG F) (LB MOLES) (LB MOLES) 
(PER U.T.) (PER UeTe) 
1 79.659 677.00 492.643 
2 89.94 903.53 511.74 
3 94.87 922.84 Bete 
4 96.88 932.20 536.08 
y 93.04 947.18 595.07 
6 Bite 2 974.172 2381.05 
7 92.35 1081.75 2502.01 
8 96.60 L202 11 255/515 
9 100.44 1238.45 2553.93 
10 106.47 1254.63 2576.50 
ll 116.15 Lie TET Pa) 2623-49 
12 129.35 1324.19 2704.68 
13 144.25 1405.38 2810.14 
14 159.'25 1510.84 2889.79 
15 178.91 1590.49 2689-96 
16 252.94 1390.66 1299.30 


CALCULATED REBOILER LOAD = 





THETA( 1) = 12003016 


0.15536768E 08 BTU/U.T. 








1.000000 


NUMBER OF ITERATIONS = 25 
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PROBLEM NO. 
__PROBLEM 


7 
STATEMENT _ 





BUBBLE POINT METHOD 
REBOILED ABSORBER 








SIDE STREAM TAKEN. 
FROM PLATE NO. 





Ase COLUMN DATA 
_ PRESSURE NO. OF PLATES Str EE USENTERS 
(PSTA) (INCLUDING ON PLATE NO. 
REBOILER) 
270.0 16 6 


SPECIFIED TOP PRODUCT RATE 


677.000 LB MOLES/U.T. 








(NO SIDE STREAM) 


SPECIFIED SIDE STREAM RATE 


_ 0-000 LB MOLES/U.T. 


























THETA CONVERGENCE TOLERANCE = 0.0010 
PRODUCT STREAM CONVERGENCE TOLERANCE = 0.6770 
TEMPERATURE WEIGHTING FACTOR = 0.250 | 
Bs FEED DATA 
- | TEMPERATURE (DEG F) CONDITION 
FEED NUMBER 1 50.0 VAPOUR/LIQUID 
ABSORBER OIL -5.0 SUB-COOLED LIQUID 
FEED ABSORBER OIL 
COMPONENTS LB MOLES = MOLE L6UMOLES*S)) MOLE See 
PER UseT. FRACTIUN PER U.eT. FRACTION 
NITROGEN 0.700 0.0004 0.000 0.0000 
Co2 12.400 0.0072 0.000 0.0000 
METHANE 167.400 0.0978 0.000 0.0000 
ETHANE 474.500 Geers 0.000 0.0000 
PROPANE 440.200 0. 2573 25 0.000 0.0000 te 
I-BUTANE 64.300 0.0376 0.000 0.0000 
N-BUTANE 128.800 0.0753 0.000 0.0000 
I-PENTANE 19.500 0.0114 0.000 0.0000 
N-PENTANE 19.400 0.0113 0.000 0.0000 
N-HEXANE 13.100 0.0077 0.000 0.0000 
MeRYPTH CPN slam) Je 000mene 0.0053.-8 | 0.500.) 0.0019) ae 
HYPTH CPNT 2 5.300 0.0031 2-100 0.0079 
HYPTH CPNT 3 128.300 0.0750 95.300 0.3584 
HYPTH CPNT 4 203.300 0.1188 149.900 0.5637 
HYPTH CPNT 5 24.700 0.0144 18.100 0.0681 
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Ce. ENTHALPY DATA 





CHAO-SEADER CORRELATION USED 


D. EQUILIBRIUM RATIO DATA _ 





CHAO-SEADER CORRELATION USED 


Es INITIAL ASSUMPTIONS. 








PLATE VARIABLES 























PLATE NO. TEMPERATURE VAPOUR RATE LIQUID RATE 
(DEG F) (LB MOLES) (LB MOLES) 
(PER U.sTe) (PER UsTe) 
1 15.00 677.00 270.00 
2 90.00 750.00 350.00 
3 100.00 800.00 430.00 
4 110.00 850.00 500.00 
5 120.00 900.00 580.00 
6 135.00 950.00 660.00 
7 150.00 900.00. 740.00 
8 160.00 900.00 820.00 
9 175.00 900.00 900.00 
. 10 190.00 900.00 980.00 
11 200.00 950.00 1060.00 
12 210.00 1000.00 1140.00 
es 13. 220.00 e000. 00; _1200.00 
14 230.00 1000.00 1250.00 
15 240.00 1000.00 1270.00 
16 250.00 1299.80 





1000.00 
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PROBLEM NO. 


7 


Su CnvE POL. METHOD — 3. 


PRODUCT STREAMS 


TOP PRODUCT 











‘CALCULATED REBOILER LOAD 


BOTTOM PRODUCT 





SIDE STREAM 


























THETA( 1) = 1.003597 


THETA ( 


2) 


1.000000 











COMPONENTS (LB MOLES) (LB MOLES) (LB MOLES) 
Bee. (PER U.T.)om 2 (PER U.T.) (PER U.T. 1a 
NITROGEN 0.700 0.000 0.000 

co2 12.398 0.002 0.000 
METHANE 1672400 0.000 0.000 
ETHANE 455.166 19.334 0.000 
PROPANE 41.081 399.119 0.000 
I-BUT ANE _ Oel 94 eer 64.106. 0.000 
N-BUTANE 0.079 128.721 0.000 
I-PENTANE 0.000 19.500 0.000 
N-PENTANE 0.000 19.400 0.000 

N-HEXANE 0.000 13.100 0.000 

HYPTH CPNT 1 0.007 9.493 0.000 

HYPTH CPNT 2 ee 0. 00S meine 1.392 0.000 

HYPTH CPNT 3 0.097 223.503 0.000 

HYPTH CPNT 4 0.048 353.152 0.000 

HYPTH CPNT 5 0.002 42.798 0.000 

TOTAL RATES 677.181 1299.619 0.000 

PLATE VARIABLES 

PLATE NO. TEMPERATURE VAPOUR RATE LIQUID RATE 

(DEG F) (LB MOLES) (LB MOLES) 

(PER U.T.) (PER U.Te) 
l 74.207 677.00 469.84 
2 83.84 880.94 487225 
3 88.37 898.35 496.12 
4 89.87 907.22 511.17 
5 85.08 Spe ray 574.30 
6 76044 943.97 2305-76 
7 86.39 1005.96 2414.47 
8 90.18 1114.67 2447.75 
9 93.38 1147.95 2463.02 
10 98 «32 1163.22 2481.14 
Ll 106.50 1181.34 2515.57 
12 118.61 Poder? 2579248 
13 133.64 1279.69 2675440 
14 ae 149.44 pe 375% 60 2763446 
15 168.76 1463.66 2616.17 
16 238.35 1316.37 1299.80 


0.14190452E 08 BIU/U.T. 





NUMBER OF ITERATIONS = 


29 
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Appendix F Annex 12 


PROBLEM NOw 2 
PROBLEM STATEMENT 








Darou oALoo ME LHOD Sn e= |e erie 








ABSORBER 
ee VOLUMN DATA ee aa é f 
PRESSURE (PSIA) NUMBER OF PLATES 
60.0 4 
PRODUCT STREAM CONVERGENCE TOLERANCE = 0.0578 _ 





TEMPERATURE WEIGHTING FACTOR = 1.000 


Be. FEED DATA 























TEMPERATURE (DEG F) CONDITION 
me) FEED ‘ 0.0 SATURATED VAPOUR 
ABSORBER OIL 90.0 SUB-COOLED LIQUID 
FEED ABSORBER OIL 
COMPONENTS LB MOLES MOLE LB MOLES MOLE 
| PER U.T. _ FRACTION PER U.T. _ FRACTION 
METHANE 28.500 0.2850 0.000 0.0000 
ETHANE 15.800 0.1580 0.000 0.0000 
PROPANE Die OCMEN Os 2400 eee’ 0.000 0.0000 
N-BUTANE 16.900 0.1690 22210 0.0200 
N=PENTANE 14.800 0.1480 5.520 0.0500 
OCTANE 0.000 0.0000 102.670 0.9300 


_ SPECIFIED TOP PRODUCT RATE. 57.800 LB MOLES/U.T. 

















Ce. ENTHALPY DATA 








~  CHAO-SEADER CORRELATION USED 


De EQUILIBRIUM RATIO DATA 








~ CHAO-SEADER CORRELATION USED | 


Es INITIAL ASSUMPTIONS 


PLATE VARIABLES 











PLATE NO. TEMPERATURE VAPOUR RATE LIQUID RATE 
* (DEG F) (LB MOLES) (LB MOLES) 
(PER U.Te) (PER UeTe) 
1 100.00 57.80 128.80 
2 Re aey ok ae) et Gil 0 ; 135.10 
3 120.00 8260 140-90 
4 135.00 85.80 152.30 














. 
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~ COMPONENTS — 


ees Bie METHANE 
ETHANE 
PROPANE 
~N-BUTANE 
N-PENTANE 
OCTANE 





TOTAL RATES 


~ PLATE NO. 


Wh Ee 


PROBLEM NO.w 2 





SUM RATES METHOD 





Secu PRODUCTASTREAMS* ee. 











DRY GAS Ro bt 1 ee 
(LB MOLES) (LB MOLES) 
CPERT Us tel) (PER U.T.) 
ee Oe ee DEO ES 
£3 oS LE 22609 
12.000 12.000 
ZeLoes 16.928 
0.949 LO ea ti 
0./32 101.938 
56.2421 153.979 


PLATE VARIABLES 








NUMBER OF ITERATIONS = 9 


ere saeareae ts tee: Sanere 


Lad hha eee AREA AAR Hb OtA ot lew A6 A tt 4 8 





TEMPERATURE VAPOUR RATE LIQUID RATE 
(DEG F) (LB MOLES) (LB MOLES) 
ets, HI PEREU she) me PERU e TaD 
111.45 56.42 125.92 
120.20 W1604 131.07 
12560 77.09 135.61 
[i937 814.63 153.98 
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PROBLEM NO. 2 
PROBLEM STATEMENT 


Pt eit eeenae Peo, | SUM RATES METHOD =~ . 











ABSORBER 
Aw COLUMN DATA en i Pel Cie “e 
PRESSURE (PSIA) NUMBER OF PLATES 
60.0 4 
PRODUCT STREAM CONVERGENCE TOLERANCE = 0.0578 








TEMPERATURE WEIGHTING FACTOR = 1.000 


Be FEED DATA 























TEMPERATURE (DEG F) CONDITION 
_ FEED bahineds 2020 SATURATED VAPOUR 
ABSORBER OIL 90.0 SUB-COGLED LIQUID 
FEED ABSORBER OIL 
COMPONENTS UB. MOLES MOLE LB MOLES MOLE 
ial PER U.T. FRACTION PER UeTe FRACTION 
METHANE 28.500 OeculU 0-000 0.0000 
ETHANE 15.800 0.1580 0.000 0.0000 
, PROPANE 24-000 en 0.2400 ge 02000 20.0000. 
N-BUT ANE 16.900 0.1690 Zeal.d 0.0200 
N-PENTANE 14.800 0.1480 52520 0.0500 
OCTANE 0.000 0.0000 102.670 0.9300 


SPECIFIED TOP PRODUCT RATE = 57-4800 LB MOLES/U.T. 
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C. ENTHALPY DATA 
~ CHAQ-SEADER CORRELATION USED — Re 
D. EQUILIBRIUM RATIO DATA 
~- CHAO=SEADER CORRELATION USED Seth we es 
Es INITIAL ASSUMPTIONS 
ana PLATE VARIABLES ; 
PLATE NO. TEMPERATURE VAPOUR RATE LIQUID RATE 
a (DEG F) (LB MOLES) (LB MOLES) 
(PER UsTe) (PER UT.) 
1 111.45 56.42 125.92 
2 120.20 __ ot MAS hake 131.07 
3 125-60 77.09 135.61 
4 119.37 81.63 153.98 
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PROBLEM NOU. 2 
SUM RATES METHOD 











PRODUCT STREAMS 




















Lh Caatee DRY GAS RICH OIL 
COMPONENTS (LB MOLES) (LB MOLES) 
(PER U.T.) (PER U.T.) 

, METHANE die | PAPE oe ty tty ee, (1.094 
ETHANE 13.318 2.482 
PROPANE 12.516 11.484 

ss N=BUTANE 2.366 16.744 
N-PENTANE 0.984 19.336 
UCTANE 0.759 101.911 

TOTAL RATES 57.348 153.052 
the Deer PLATE VARIABLES 

PLATE NO. TEMPERATURE VAPOUR RATE LIQUID RATE 
(DEG F) (LB MOLES) (LB MOLES) 
ah eg hee ke of (PER U.T.) ; (PER U.T.) 

l 112.38 57.35 126.40 

2 121.61 73.35 131.73 

3 127.56 78.68 136.35 

4 123.05 83.29 153.05 


NUMBER OF ITERATIONS = 17 























iy COLUMN DATA 





PROUGLEM NOs. 2 
PROBLEM STATEMENT 








‘DUM RATHO METHODS ieee. 
ABSORBER 














von won f FED 




















SPECIFIED TOP PRODUCT RATE = 











PRESSURE (PSIA) NUMBER OF PLATES 
60.0 4 
PRODUCT STREAM CONVERGENCE TOLERANCE = 0.0578 _ 
TEMPERATURE WEIGHTING FACTOR = 1.000 
FEED DATA a) See ee 
TEMPERATURE (DEG F) CONDITION 
| Dean 29.7 SATURATED VAPOUR 
ABSORBER OIL 90.0 SUB-COOLED LIQUID 
Wee Eco ms: ABSORBER OIL 
COMPONENTS beh UGeSs MOLE LB MOLES MOLE 
BERS Ue ls FRACTION PER U.T. FRACTION 
METHANE 28.500 0.2850 0.000 0.0000 
ETHANE 15.800 0.1580 0-000 02-0000 
PROPANE 24.2000 0.2400 0.000 0.0000 
N-BUTANE 16.900 01690 e222 10mue0s0200 
N-PENTANE 14.800 0.1480 5.520 0.0500 
OCTANE 0.000 0.0000 102-670 0.9300 


57.800 LB MOLES/U.T. 














Ce. ENTHALPY DATA 


CHAO-SEADER CORRELATION USED 





De EQUILIBRIUM RATIO DATA 








CHAO-SEADER CORRELATION USED 


Ee INITIAL ASSUMPTIONS 





PLATE VARIABLES 





























eee LATED NOU. TEMPERATURE = VAPOUR RATE = LIQUID RATE 
(DEG F) (LB MOLES) (LB MOLES) 
(PER U.T.) (PER U.Te) 
cre 4 Eel Sreeg eac ky e): 112.38 57.35 126.40 
2 V2086) 73.35 131.73 
3 127.56 78.68 136.35 
4 T2805 oe 83.29 153.05 





SUM RATES METHOD 





PRUBLEM NGeh sec 





~ PRODUCT STREAMS | 























NUMBER OF ITERATIONS 


aed dy a DRY GAS RICH OIL 
COMPONENTS (LB MOLES) (LB MOLES) 
; {PER U.T.) (PER U.T.) 

Se re NG eee ee 142 a els O76 W232 
ETHANE eee s: Zeal? 
PROPANE L2e767 11.233 
N-BUTANE 2.463 16.647 
N-PENTANE 1.002 19.318 
OCTANE 0.773 101.897 

TOTAL RATES 57.808 152.592 
Beata Y ue PLATE VARTABLES 

PLATE NO. TEMPERATURE VAPOUR RATE LIQUID RATE 
(DEG F) (LB MOLES) (LB MOLES) 
- (PER U.Te) S(PER Us ta) 

1 tive oS 57.81 126.64 

2 122232 74.05 132.06 

3 128.55 19e4 7 136.71 

4 124.87 84612 152.59 
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